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Oferujemy dla Twojego Atari (XL/XE) 


• A.D. 2044 cena: 45 000 

- gra przygodowa (na motywach fiimu "Se¬ 
ksmisja") 

• ADAX cena: 46.000 

- komnatówka, misja zwiadowcy na plane¬ 
cie Adax, 

• AUTOMAT PERKUSYJNYcena: 48.000 

- program użytkowy do tworzenia "muzy¬ 
czek" komputerowych, obszerna instrukcja 
obsługi. 

• CAPTAIN GATHER cena: 42.000 

- gra logiczna, pierwsze plansze wydają się 
łatwe 

• CHANGE cena: 43.000 

- coś dla miłośników łamigłówek. 

• CONSTELLATION cena: 43.000 

gra ekonomiczna (tylko na dyskietce). 

• CHAOS MUSIC COMPOSER 

cena: 48.000 

pakiet zawierający program do kompono¬ 
wania, moduł odtwarzający oraz wyczerpu¬ 
jącą instrukcję 

• DAGOBAR cena. 42.000 

- gra logiczna, kolejne przygody dzielnego 
Kapitana Galhera 

• DARKNESS HOUR cena: 45 000 

gra komnatowa, poszukiwanie zaklętych 
dusz rycerzy 

• DIGI DUCK cena:45.000 

- Robbo 7 Nie! Chodzący telewizor 

• GOLD HUNTER cena: 43. 000 

gra przygodowa, poszukiwacz złota 
w akcji. 

• HANS KLOSS cena: 43.000 

gra przygodowo-zręcznościowa, poszuki¬ 
wania planów tajnej broni w bunkrze Wolf- 
schanze 

• KLĄTWA cena: 49.000 

- gra przygodowa koncepcja i grafika po¬ 
dobna jak w A. D 2044 

• KURS FIZYKI cena: 49.000 

- program edukacyjny dudnienia, załama¬ 
nie i odbicie fali, efekt Dopplera. 

• LASERMANIA, ROBBO 

KONSTRUKTOR cena:43.000 

efektowna gra logiczna oraz program użyt¬ 
kowy pozwalający na tworzenie własnych 
wersji gry ROBBO 

• LORIEN S TOMB cena: 42.000 

- ekspedycja archeologiczna do grobowca 
faraona 

• MAJOR BRONX cena:42.000 

- gra zręcznościowo-logiczna 

• MISJA, FRED cena: 43.000 

zmagania komandosa w tajnej MISJI, wę¬ 
drówka przez pełną niebezpieczeństw krainę 

• PANTHER cena: 48.000 

- wielofunkcyjny edytor tekstów pozwalają 
cy drukować po polsku na wszystkich po¬ 
pularnych drukarkach. 

• PANTHER + MICROPRINT 

cena: 230.000 

• PIEKIEŁKO cena: 43.000 

- prawdziwie piekielna gra, ale wciągająca. 

• CtUICK ASSEMBLER cena: 67.000 

- zestaw do programowania w języku 
asemblera QA pakiet edytora, asemblera 
i mmi debugera, BUG HUNTER - nowo¬ 
czesny debuger caloekranowy, XL FRIEND 

- edytor tekstów, tabela kodów ASCII; Ze¬ 
staw procedur bibliotecznych, Podręcznik 
zawierający krótki kurs programowania. 

• ROBBO cena: 33.000 

- wspaniała gra zręcznościowo-logiczna 

• RUCU cena: 42.000 

- komputerowa kostka RUBIKA 

• SAPER cena: 42.000 


- gra logiczno-zręcznościowa 

• SZPERACZ DYSKOWY cena: 48.000 

- program użytkowy służący do obsługi sze¬ 
roko pojętych operacji dyskowych 

• THE JET ACTION cena: 44.000 

- kosmiczny RIVER FIAID dla łamaczy joy¬ 
sticków 

• TRIK cena: 42.000 

- wciągająca gra zręcznościowo-logiczna 

• U 235 cena: 42.000 

- krótka recenzja: 'rozkosz łamania głowy 

• UCZEŃ CZARNOKSIĘŻNIKA 

cena: 45.000 

- gra komnatowa, przygody adepta czarnej 
magii. 

• UPIÓR cena: 45.000 

- gra komnatowo-labiryntowa, przygody 
śmiałka w zamku pełnym niebezpiecznych 
stworów 

• VICKY cena: 49.000 

- przygody młodego wikinga w krainie Wal- 
halli 

Programy wydane przez LK.AVALON na 
licencji ZEPPELIN GAMES: 

• BLINKY’S SCARY SCHOOL 

• CAYERNIA 

• MIRAX FORCE 

• NINJA COMMANDO 

• SPEED ACE 

• STACK UP 

• ZYBEX 

Opisy oraz krótkie recenzje w numerze 10/92 
Cena jednej gry 45 000 zl 

Wymienione niżej programy nia 
powstały w naszej firmie Zachęcamy 
jednak do ich zakupu 

e ARTEFAKT PRZODKÓW cena: 65.000 

- ponad 100 różnorodnych komnat, znako¬ 
mita grafika, płynna animacja 

e BANG! BANK! cena: 45.000 

- strzelanina na Dzikim Zachodzie 

e BATTLE SHIPS cena: 44.000 

-gra w'statki z komputerem 
e BERTYX cena: 44.000 

zmagania z wrogim komputerem na pla¬ 
necie Bertyx 

e DUCH, ROBAL cena: 45.000 

- zestaw dwóch gk labiryntowych. 

e GALLAHAD cena: 45.000 

- gra komnatowa walka Tristana z podstę¬ 
pnym Magiem 

e GEOGRAFIA POLSKI cena: 40.000 

prosty program edukacyjny (klasa V i VI) 
e GEOGRAFIA ŚWIATA cena: 49.000 

- program edukacyjny (państwa, stolice, 
waluty itp). 

e GUARD cena: 47.000 

- pilot kosmicznego myśliwca walczy 
z eskadrami wroga 

e HELIX cena: 45.000 

- bohaterski Helix przemierza komnaty sta¬ 
rego zamczyska 

• HUMANOID cena: 47.000 

- gra zręcznościowo-logiczna 

• I.Q. MASTER cena: 46.000 

gra zręcznościowo-logiczno-edukacyjna 

• KOLONY cena: 44.000 

- gra ekonomiczna 

• KULT cena: 48.000 

- pomysł jakby znany (ZYBEX), szybka ak¬ 
cja, dużo strzelania 

• MAGIA KRYSZTAŁU cena: 54.000 


- wędrówka maga Tannatosa ku twierdzy 
demona Syrylaka 

• MASTER HEAD cena: 47 000 

- gra logiczna z kilkunastomlnutową muzy¬ 
ką 

• MIECZE VALDGIRA cena: 46.000 

- przygodowa gra fantasy z doskonalą mu- 
zyką, 

• MONSTRUM cena: 46.000 

- popularny robal" w nowej oprawie 

• MÓZGPROCESOR cena: 47.000 

- wznowienie znanej gry tekstowej 

• MUFF DRUTT cena: 46.000 

- zestaw dwóch gier zręcznościowych 

• NAJEMNIK cena: 49.000 

- walka bohatera z przestępcami niezła 

strzelanina 

• NEWWORDS cena: 49.000 

- program edukacyjny, kurs języka angiel¬ 
skiego, z instrukcją 

• OPERATION BLOOD cena: 45.000 

- krwawe starcie z niezliczoną ilością prze¬ 
ciwników (Operation Wolf) 

• ORTOGRAFIA cena: 44.000 

- program edukacyjny, nauka połączona 

z dobrą zabawą. 

• PONG cena: 45.000 

- gra zręcznościowa. 

• PROBLEM JASIA cena: 45.000 

- puzzle ze zdjęciami popularnych aktorów 

ę PRZEMYTNIK eena: 46.000 

gra ekonomiczna. 

• RASZYN cena: 45.000 

- polska gra strategiczna, bitwa pomiędzy 
VII korpusem austriackim a wojskami Księ¬ 
stwa Warszawskiego 

• RIOT cena: 45.000 

- walki karate w cygańskiej dzielnicy. 

• RODERIC cena: 44.000 

przygody rycerza w starym zamczysku 

• SKARBNIK cena: 46.000 

- gra logiczna 

• SOUND TRACKER cena: 49.000 

- program muzyczny wzorowany na imien¬ 
niku z Amigi. 

• TACTIC cena. 47.000 

- gra logiczno-zręcznościowa, 

• TANKS cena: 45.000 

- walka czołgów w labir ncie 

e THE CONVICTS cena: 45.000 

- gra labiryntowa (podobna do ROBBO). 

e THINKER cena: 45.000 

- dwie proste, lecz ciekawe gry logiczne. 

e VIDEOGRAPH cena: 48.000 

- narzędzie do tworzenia czołówek fiimów 
video 

e ZESTAWY GIER Z TA: 

1 Fac, QQ, Robal, Dalej Niz Słonce 
2.Heartlight, Puzzle Oczko. 

3.Odsiecz, Follow, Kiocki, Pustynna Burza 

Cena zestawu 35.000 

Cena kompletu (3 zestawy) 90 000 


Zamówienia na kartach pocztowych, 
z wyraźnym oznaczeniem rodzaju noś¬ 
nika (kaseta lub dysk) oraz pełnym ad¬ 
resem zamawiającego prosimy 
kierować do 

L.K. AVALON 
skr. poczt. 46 
38-100 Strzyżów 

Uregulowanie należności następuje 
przy odbiorze przesyłki 
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Opiymalizacją nazywamy takie 
zmiany w gotowym, działającym pro¬ 
gramie, by pewne (założone) parame¬ 
try tego programu zmieniły się na le¬ 
psze Warunek poprawnego działania 
Jest bardzo ważny, ponieważ optymali¬ 
zowanie programu na ogół zmniejsza 
Jego czytelność, utrudnia przeto póź¬ 
niejsze poprawki i uzupełnienia; zwię¬ 
ksza się podatność programu na 
wprowadzenie trudnych do zlokalizo¬ 
wania błędów. Optymalizowanie pro¬ 
gramu działającego źle (lub wcale) mi¬ 
ja się w ogóle z celem. 

Możemy tylko zazdrościć 'dużym 
komputerom, dla których napisano 
wiele systemów automatycznej opty¬ 
malizacji. Niestety, my musimy to ro¬ 
bić ręcznie (tak się mówi, choć w pra¬ 
cy tej największy udział ma głowa). 
Optymalizowanie Jest czynnością trud¬ 
ną i niebezpieczną Przed rozpoczę¬ 
ciem tego procesu dobrze Jest wyko¬ 
nać kopię tekstu programu, bo być 
może trzeba będzie do nie) wrócić, gdy 
przeoptymalizowany" program w ogó¬ 
le przestanie działać 

Z wielu możliwych celów optymaliza 
eji najczęściej stawiamy sobie dwa: 
zwiększenie szybkości lub zmniejsze¬ 
nie rozmiarów programu. Niestety, 
rzadko udaje się pogodzić te postulaty 

Aby złagodzić zjawisko pogarsza¬ 
nia się przejrzystości programu sto¬ 
sujemy komentarze opisujące Istotę 
dokonanej modyfikacji, np.: 

LDA #0 

JMP DALEJ 

zamieniamy na. 

LDA #0 

BEQ DALEJ (zawsze, bo Z=l) 

Tym sposobem zyskujemy Jeden 
bajt, ale uzależniamy rozkaz BEQ od 
poprzedniego Jeżeli w przyszłości 
zajdzie potrzeba zmiany pierwszego 
rozkazu na; 

LDA #1 

mamy szansę, dzięki komentarzowi, 
pamiętać o konieczności zmiany wa 
runku skoku. 


Zwiększenie szybkości 
przy niezmienionych 
rozmiarach 

Ten typ optymalizacji Jest pier¬ 
wszym, najłagodniejszym sposobem 
przyspieszania bez zbytniego zaburza¬ 
nia struktury programu. Polega on na 
takim przegrupowaniu rozkazów, aby 
wyrzucić z wnętrza pętli te rozkazy, 
które nie muszą być wykonywane za 
każdym razem. Napisałem tak: 

LDY #39 
ZERUJ LDA #0 

STA (EKR),Y 
DEY 

BPL ZERUJ 

dla wyzerowania na ekranie pewne¬ 
go wiersza, którego adres znajduje 
się w słowie EKR. Odzwierciedla to 
mój sposob myślenia w chwili two¬ 
rzenia algorytmu: umieszczam 
w akumulatorze 0, przesyłam je do 
pamięci, to samo dla sąsiedniej ko¬ 
mórki, 1 tak dalej .. Ale uważny rzut 
oka upewnia nas, źe zawartość aku¬ 
mulatora nie Jest nigdzie wewnątrz 
pętli zmieniana. Nie ma więc powo¬ 
du, by odnawiać Ją tyle razy. W zu¬ 
pełności wystarczy: 

LDY #39 
LDA #0 

ZERUJ STA (EKR),Y 
DEY 

BPL ZERUJ 

Teraz pętla ZERUJ wykonuje się 
znacznie szybciej. Inny przykład: ze¬ 
rujemy 10 stron pamięct: 

LDX #10 
LDA #0 
Z LDY #0 

ZERUJ STA (ADDR),Y 
INY 

BNE ZERUJ 
INC ADDR+1 
DEX 
BNE Z 

Widać Jednak, ze zewnętrzna pętla 
zaczyna się od nadania rejestrowi 
Y wartości 0 i taka też wartość pozo¬ 
staje w nim w chwili opuszczenia 
pętli. Można więc z powodzeniem 
usunąć etykietę Z, a ostatni wiersz 
zamienić na: 
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BNE ZERUJ 

Oczywiście dzlewięeiokrotne nie¬ 
wykonanie rozkazu LDY daje nie¬ 
wielki zysk, ale może się on kumulo¬ 
wać, jeżeli taki fragment jest w pro¬ 
gramie wywoływany wielokrotnie. 

Jednoczesne 
zwiększenie szybkości 
i zmniejszenie rozmiarów 

Najbardziej pożądany wariant. Po¬ 
lega na usuwaniu zbędnych rożka 
zów lub zamianie dłuższych sekwen 
cji na krótsze o takim samym działa¬ 
niu. Przeciętny, dobrze napisany 
program zawiera całe mnostwo 
zbędnych rozkazów Na etapie kon 
struowanla 1 testowania programu 
nie troszczymy się o to, ponieważ 
nadrzędnym celem jest przejrzy 
stość. Potem zaczyna się zabawa 
w wyciskanie wody". Nieraz zakła¬ 
dam się z kolegami, ze KAŻDY pro¬ 
gram można skrócić o jeden bajt. 
Oczywiście, nie Jest to prawda abso 
lutna, lecz w praktyce sprawdza się 
na tyle często, że wygrywam prawie 
każdy taki zakład Nie sposób opisać 
wszystkich możliwości, pokażę więc 
kilka typowych przykładów. 

Kopiowanie zawartości rejestru 

polega na "pożyczeniu" potrzebnej 
wartości z Innego rejestru zamiast 
pobierania jej z pamięci. W poprze¬ 
dnim przykładzie 

LDA #0 
LDY #0 

można zastąpić przez- 

LDA #0 
TAY 

z zyskiem jednego bajtu. 

Wykorzystanie zawartości reje¬ 
stru polega na zaniechaniu umiesz¬ 
czania w rejestrze nowej wartości, 
gdy wiemy, że poprzednia była taka 
sama Przykład umieszczenie w pa¬ 
mięci adresów dwóch kolejnych 
wierszy ekranu. 

LDA «EKRAN 

LDX >EKRAN 

STA ADR1 

STX ADRl+1 

LDA <EKRAN+40 

LDX >EKRAN+40 (!) 

STA ADR2 
STX ADR2 + 1 

W przeważającej większości przy¬ 
padków oba adresy dotyczą tej sa¬ 
mej strony pamięci 1 rozkaz oznaczo¬ 
ny (!) można usunąć z programu. 

Bardzo często pętle kończą się 
z wartością 255 (czyli -1) w rejestrze 


Indeksowym, jak to ma miejsce 
w pierwszym z przykładów zerowa¬ 
nia. Jeżeli po takiej pętli następuje 

rozkaz 

LDY #0 

to można go z powodzeniem zastąpić 
przez 

INY 

Wykorzystanie stanu znacznika 

polega na zaniechaniu ustawiania 
znacznika, ktorego stan jest znany. 
Przytaczana juz na tych stronach 
uproszczona konwersja ATASCI1 na 
kod ANTlC-a może zawierać spraw¬ 
dzenie, czy liczba jest większa od 96 , 
bo wtedy pozostawiamy ją bez zmian: 

CMP #96 

BCS OK 

W przeciwnym razie trzeba od niej 
odjąć 32 - 

SEC 

SBC #32 

Ponieważ jednak po nieskutecz¬ 
nym skoku BCS znacznik C ma za¬ 
wsze wartość 0, możemy powyższą 
parę rozkazów zastąpić jednym, 
z takim samym skutkiem: 

SBC #31 

Zawsze skasowany znacznik 
C spowoduje odjęcie dodatkowej je¬ 
dynki, dlatego niezbędne jest skory¬ 
gowanie argumentu 

Użycie właściwego trybu inde¬ 
ksowego dla strony zerowej. Jak 

wiemy, w repertuarze rozkazów na 
szego procesora brak jest krótkiej 
formy rozkazu 

LDA Z0,Y 

dla ZO zadeklarowanego jako war 
tość z zakresu 0..255 i dlatego 
asembler tłumaczy to na trzybajtowy 
rozkaz maszynowy (dwubajtowy ar¬ 
gument) Zamiana rejestru 

LDA Z0,X 

sprawi, ze rozkaz ten będzie miał 
2 bajty długości (argument jednobaj- 
towy). Ten zabieg może niestety wy¬ 
magać zmian w koncepcji wykorzy¬ 
stania rejestrów w okolicznych czę¬ 
ściach programu, dlatego lepiej mieć 
to na uwadze Juz podczas wstępnego 
komponowania algorytmu 

Wiązanie procedur polega na 
zmianie sposobu wywoływania pro¬ 
cedur z wnętrza innych procedur 
Jeżeli procedura X wywołuje proce¬ 
durę Y tak 


Y LDY #0 

RTS 

X LDX # 0 

JSR Y (!) 

RTS (!!) 

to można z powodzeniem pominąć 
rozkaz oznaczony (!!), a poprzedni 
zamienić na 

JMP Y (!) 

Teraz jednak wystarczy zamienić 

kolejność tych dwóch procedur, aby 
rozkaz oznaczony (!) można było cał¬ 
kowicie pominąć 

Zwiększenie szybkości 
kosztem rozmiarów 

Rozwijanie pętli polega na zamia¬ 
nie pętli na niecykliczną sekwencję 
rozkazów Przykładowo, zerowanie 
pięciu kolejnych bajtów od adresu 
TAB: 

LDY #4 

LDA #0 

ZERUJ STA TAB,Y 
DEY 

BPL ZERUJ 

zajmuje 10 bajtów i wymaga od pro¬ 
cesora wykonania 17 rozkazów 
Równoważny temu fragment: 

LDA #0 

STA TAB 
STA TAB+1 
STA TAB+2 
STA TAB+3 
STA TAB+4 

zajmuje 17 bajtów, lecz wymaga wy¬ 
konania tylko 6 rozkazów 

Stosowanie tablic zamiast obli¬ 
czeń polega na wstępnym przygoto¬ 
waniu tablic wartości, z których trze¬ 
ba często korzystać Wykorzystanie 
tablicy do konwersji kodów ATASCII 
na kody ANTIC-a pokazałem w TA 
9/92. Innym popularnym zastosowa¬ 
niem tej metody jest tablicowanie 
wartości funkcji trygonometrycznych 
Na początku programu "na sucho” ob¬ 
licza się WSZYSTKIE wartości, z któ¬ 
rych będziemy później korzystać. Póź¬ 
niej, podczas normalnej pracy pro¬ 
gram nie odwołuje się juz do znanych 
ze swej chyżoścl funkcji w ROM te 
ATARI, lecz czerpie gotowe wartości 
z tablicy. 

■X. 

Zmniejszanie rozmiarów 
kosztem szybkości 

Zwijanie sekwencji w pętlę polega 
na zastępowaniu serii rozkazów pętlą 
Typowym przykładem jest przechowy 
wanle wektorów dwóch przerwań 




LDA WBLKI 
STA OLDVBI 
LDA WBLKI+l 
STA OLDVBI+l 
LDA WBLKD 
STA OLDVBD 
LDA WBLKD+1 
STA OLDVBD+l 

Zajmuje to 24 bajty, gdy słowa 
OLDVBI1 OLDVBD znajdują się poza 
stroną zerową. Po zwinięciu w pętlę: 


LDX #1 

CHOWA LDA WBLKI,X 
STA OLDVBI,X 
LDA WBLKD,X 
STA OLDVBD,X 
DEX 

BPL CHOWA 

fragment równoważny pod względem 
efektu zajmuje juz tylko 17 bajtów 

Zastępowanie podobnych se¬ 
kwencji procedurą polega na odszu¬ 
kiwaniu fragmentów programu po 
dobnych do siebie i zastępowaniu 
ich wywołaniem osobno stojącej pro¬ 
cedury. Typowym przykładem jest 
dodawanie do pewnego słowa w pa¬ 
mięci różnych liczb jednobajtowych 
Taka potrzeba występuje nieraz 
podczas bezpośredniego wyświetla¬ 
nia danych na ekranie: 

CLC 

LDA ADDR 
ADC #n 
STA ADDR 
BCC OK 
INC ADDR+1 
OK EQU * 

Jeżeli takich fragmentów Jest kil¬ 
ka (wiele?), a zmienia się tylko n. to 
można je zastąpić przez: 


LDA #n 
JSR DODAJ 


i stworzyć osobną procedurę: 

DODAJ CLC 

ADC ADDR 
STA ADDR 
BCC OK 
INC ADDR+1 
OK RTS 

Podane przykłady nie wyczerpują 
wszystkich sposobów optymalizacji 
- Jest ich bez liku. Tym większe pole 
do popisu dla miłych Czytelników. 
Pamiętajcie: każdy program można 
udoskonalać bez końca. Ale po co?... 



Legenda mówi. ze na 
pierwszej komputerowej 
wersji gry w Ping-Pong 
zbudowano Imperium ATA¬ 
RI Prezentujemy dzisiaj 
kolejną wersję tej gry. Oto 
kilka uwag na Jej temat 

Poziom trudności gry 
z komputerem można zmie¬ 
nić Stuzą do tego trzy 
ostatnie bajty w wierszu 
1750 Ich znaczenie Jest na¬ 
stępujące: 


Trzeci bajt od końca 
określa, czy przy odbiciu 
pliki nastąpi zmiana kąta 
odbicia (oczywiście trzeba 
"zaciąć"): 

01 oznacza kąt bez zmian, 
02 oznacza, że kąt zwię¬ 
ksza się 2 razy 

Inne wartości są niedozwo¬ 
lone' 

• Drugi i pierwszy bajt 
(licząc od końca) two¬ 
rzą przedział, który 
określa poziom trud¬ 
ności gry Dozwolone 
wartości to 01 ID, 
021C, 03 IB, 041A, 

0519, 0618, 0717, 

0816, 0915, 0A14 

Uszeregowano Je w ko¬ 
lejności od najłatwiej¬ 
szego do najtrudniej¬ 
szego poziomu 
Standardowo znajdują się 
tam następujące trzy warto¬ 
ści: 01 01 ID (kąt bez 

zmiany przy odbiciu, po¬ 
ziom najłatwiejszy). 

W trakcie gry używany 
jest Joystick i klawisze kon 
soli. Ich znaczenie Jest na¬ 
stępujące. 

START - gra z komputerem 
SELECT - wybór liczby 
graczy 

ÓPTION - wyjście z progra¬ 
mu 

Po zdobyciu seta przez 
dowolnego z graczy nastę¬ 
puje automatyczna zmiana 
stron 

Zamieszczony obok listing 
należy przepisać 1 zgrać przy 
pomocy Zgrywusa+ z TA 

2/92. 


IJ 

GS 

PH 

YY 

JP 

JA 

XX 

OW 

OZ 

LK 

ZI 

NU 

FD 

RX 

CO 

XU 

SO 

MQ 

WX 

EY 

IZ 

WB 

QZ 

AO 

NC 

Ol 

SS 

HH 

ZN 

SS 

PF 

VH 

GG 

FI 

YE 

CQ 

ZD 

EX 

NR 

WP 

JW 

Al 

GF 

MQ 

CC 

QY 

IU 

KH 

HD 

VH 

KW 

JH 

XO 

RQ 

TM 

GU 

GU 

XN 


1000 REM *-< 

1002 REM : Pong 

1004 REM : autor: Jacek Binkul 
1006 REM : (c) 1992 Tajemnice ATARI 

1008 REM *-’ 

1010 DATA ffff00a833a8707070704700af 
1020 DATA 70074a00a90a0a®a0a0a0a0a0a 
1030 DATA 0a0a0a0a0a0a0a0a0a0a0a0a0a 
1040 DATA 0a0a0a0a0a0a0a0a0a0a0a0a0a 
1050 DATA 0a0a0a4100a8e002el0200a000 
1060 DATA a087a3a210a9a985cca00084cb 
1070 DATA 9891cb88d0fbe6cccal0f6a900 
1080 DATA 8d3002a9a88d3102a9ffa2139d 
1090 DATA 28a99de4abcad0f7a9fc9d3ba9 
1100 DATA 9df7aba205bd7ea395cbcal0f8 
1110 DATA a91085f085f2a005a2a2a90720 
1120 DATA 5ce4a208bd5ca39d02afcal0f7 
1130 DATA a20abd65a39dl4afcal0f7ad84 
1140 DATA 02f0fba9b08d07d4a9018d6f02 
1150 DATA a90e 8dc002a9008d08d0a9 8085 
1160 DATA fba9028dldd0a93a8d2f02a996 
1170 DATA 85faad0ad22901aaad0ad22901 
1180 DATA 9d59a3adlfd0c907f050c903d0 
1190 DATA 034c74e4c906d02aa007ad21af 
1200 DATA f00fa9009920af8810faa9028d 
1210 DATA 84a3d02ab970a39920af8810f7 
1220 DATA ad85a38d84a38d5ba3d016c905 
1230 DATA d017a901a002ae79a3f003a900 
1240 DATA a88d79a38c7aa3a9082045a3ad 
1250 DATA 84022d8502d0alad04d0f01ec9 
1260 DATA 04d00cae5aa3f002a9008d5aa3 
1270 DATA f00aae59a3f002a9008d59a3a9 
1280 DATA 0185f48dled0ad59a3d006c6fb 
1290 DATA C6fbd004e6fbe6fbad5aa3d00a 
1300 DATA a5fa38ed5ba385fad008a5fal8 
1310 DATA 6d5ba385faa000844d9891cf88 
1320 DATA d0fba4faa201a9029lcfc8cal0 
1330 DATA f8a5fb8d00d0a5fbc928a20390 
1340 DATA 0ec9d0a200b008a9012045a34c 
1350 DATA fba0felbafbdlbafc91a9008a9 
1360 DATA 109dlbaffelaafc91ld069bdla 
1370 DATA afc9129062a006a90a85f4bd07 
1380 DATA af1869809d07afa90c2045a388 
1390 DATA d0ebac0ea2ad68a28d0ea28c68 
1400 DATA a2ac0da2ad67a28d0da28c67a2 
1410 DATA 8eddala0f2a2d0c99db004a0f0 
1420 DATA a2f08c40a28c5ba28e3da2a201 
1430 DATA fe07afbd07afc913f012ad07af 
1440 DATA ac0aaf8d0aaf8c07af4c58a04c 
1450 DATA 68a0ad84022d8502d0f84c4da0 
1460 DATA ad7802490ff00d20a2a2ad04d0 
1470 DATA c901d003200ca3ad21afd00bad 
1480 DATA 7902490ff04ea202d03da5fa38 
1490 DATA e95ba200c905900638e904e8d0 
1500 DATA f6ad59a3d018a5f2e0119009cd 
1510 DATA 86a39029a901d018cd87a3b020 
1520 DATA a902d00fca3004e4f2b004a901 
1530 DATA d004f00fa902209ca2ad04d0c9 
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CU 1540 DATA 02d003200ca3a6f4bd4da3f003 
MV 1550 DATA ca86f48d00d2a9ea8d01d2a9cb 
SU 1560 DATA 8dfea2a20020eba2a9cd8dfea2 
TZ 1570 DATA a20220eba24c62e4a0cda202d0 
JC 1580 DATA 04a200a0cb8cfea286f185f7c9 
MZ 1590 DATA 02d01bb5f0c91db054f6f020e9 
KB 1600 DATA a2a6fIb5cbl869149002f6cc95 
NC 1610 DATA Cb4ceba2c901d03bb5f0f037d6 
KY 1620 DATA f020e9a2a6fIb5cb38e914b002 
XJ 1630 DATA d6cc95cb4ceba2a204a00020f6 
JS 1640 DATA a29838e956a8e8a90585dlbd78 
YW 1650 DATA a391cb4898186914a868c6dld0 
YG 1660 DATA f0b860a5f7ae5ba3c901d018ad 
RO 1670 DATA 5aa3d00be002b00ead84a38d5b 
SS 1680 DATA a360e0029003ce5ba360ad5aa3 
Ol 1690 DATA d008e00290f6ce5ba360e002b0 
AC 1700 DATA eead84a38d5ba360186514c514 
JV 1710 DATA d0fc600064640028323247475a 
MX 1720 DATA 6e780000017365740000100000 
YS 1730 DATA 1073636f72650010101al0106b 
YF 1740 DATA 6f6d7075746572010102020000 
PY 1750 DATA 7caa81aa00b40201011d 






Pan Andrzej Głąbek z Goleszowa przysłał nam pro¬ 
gram służący do kreślenia okręgów w dowolnym trybie 
graficznym przy użyciu wybranego koloru. Figury kreślo¬ 
ne są zgodnie z algorytmem przedstawionym w "Młodym 
Techniku" 12/86. Wywołanie procedury rysowania okrę¬ 
gu z BASIC-a ma postać: 

A=USR(1536,x,y,r,kolor) 

s 

Poszczególne parametry to: 

• x,y~ współrzędne środka okręgu, 

• r - promień okręgu, 

• kolor - kolor okręgu. 


Nie ma w tym numerze "Tajemnic ATARI" kącika Pan 
thera, ale zagorzali zwolennicy tego edytora znajdą coś 
dla siebie na "szóstej stronie". Pan Tomasz Maleslńskl 
postanowił wyposażyć Panther w sygnał dźwiękowy In 
formujący o dotarciu do określonej kolumny w wierszu. 
Dzięki niemu jesteśmy zwolnieni z obowiązku ciągłego 
kontrolowania ekranu 

PantherBell wydaje dźwięk, gdy kursor znajdzie się 
w osiemdziesiątej kolumnie. Liczba $4f w wierszu 1080 
określa numer tej kolumny zmniejszony o jeden Wystar¬ 
czy ją zmienić, aby dzwonek dźwięczał w Innym miejscu. 
Program wykorzystuje przerwanie vblkd 1 nie jest odpor 
ny na RESET 

Zamieszczony poniżej listing należy przepisać 1 prze 
tworzyć przy pomocy Zgrywusa+ z TA 2/92. 



Oto kilka uwag dotyczących programu- 


1. Program nie narysuje okręgu, gdy- 
«— podano za mało lub za dużo parametrów, 
i — podane współrzędne środka są większe nlz na to po¬ 
zwala dany tryb graficzny. 


2. Jeśli część figury wyjdzie poza ekran, to część ta nie 
zostanie narysowana. 


3. Przy promieniach większych od 183 pojawiają się 
zniekształcenia (w wyniku uproszczenia obliczeń). 


NZ 

LX 

IO 

GS 

0 REM *- 

1 REM : 

2 REM : 

3 REM : 

CIRCLE : 

autor: Andrzej Glabek : 

(c) 1992 Tajemnice ATARI : 

xs 

10 

FOR 1 

=1536 TO 1714:READ A:POKE I,A: 

zw 

NEXT I 
20 DATA 

104,240,11,170,56,233,4,240 

BB 

21 

DATA 

6,104,104,202,208,251,96,133 

SP 

22 

DATA 

206,104,133,1,133,86,104,133 

NO 

23 

DATA 

0,133,85,104,104,133,203,133 

MQ 

24 

DATA 

84,104,104,133,204,74,133,205 

MP 

25 

DATA 

104,104,141,251,2,32,210,246 

cx 

26 

DATA 

165,204,197,206,144,216,197 

YT 

27 

DATA 

205,176,6,101,205,133,205,198 

YF 

28 

DATA 

204,24,165,205,229,206,133 

RO 

29 

DATA 

205,169,2,133,207,24,165,0 

JJ 

30 

DATA 

101,206,133,85,165,1,105,0 

ZW 

31 

DATA 

133,86,160,1,166,87,224,8,240 

YL 

32 

DATA 

1,136,140,108,6,165,85,221 

UR 

33 

DATA 

125,238,165,86,233,0,176,3,32 

AV 

34 

DATA 

150,6,56,165,0,229,206,133,85 

IF 

35 

DATA 

165,1,233,0,144,7,133,86,166 

°Z 

36 

DATA 

87,32,150,6,165,206,166,204 

us 

37 

DATA 

133,204,134,206,198,207,208 

EM 

38 

DATA 

185,230,206,208,156,24,165 

HE 

39 

DATA 

203,101,204,176,10,221,141 

HL 

40 

DATA 

238,176,5,133,84,32,202,241 

EQ 

41 

DATA 

165,203,229,204,144,5,133,84 

N J 

42 

DATA 

76,202,241,96 


IJ 

cv 

TK 

YY 

JP 

XD 

FQ 

BB 

AP 

PE 

IN 

HT 

LS 


1000 REM *-,- 

1002 REM : Panther Bell 

1004 REM : autor: T. Malesinski 

1006 REM : (c) 1992 Tajemnice ATARI 

1008 REM *-' 

1010 DATA ffff00065306ad24028d2406ad 
1020 DATA 25028d2506a907a015a2064c5c 
1030 DATA e4ac5506f00cce5506d004888c 
1040 DATA 01d24c0000a5dfcd5606d020ac 
1050 DATA 5406d0f18c08d2a9038d0fd288 
1060 DATA 8c00d2a9a88d01d2a9208d5506 
1070 DATA 8d5406d0d6a9008d5406f 0cf 56 
1080 DATA 0656064fe002el020006 






























AB... 


"TT 


Ostatnim razem 
zakończyliśmy zmagania 
nad grafiką naszego 
komputera. Tym razem 
zajmiemy się dźwiękiem. 

Najprostsze dźwięki można osiąg¬ 
nąć wykorzystując rejestr Consol 
($D01F), bez użycia generatorów 
dźwiękowych Atarl Podstawowym 
zadaniem tego rejestru Jest obsługa 
trzech klawiszy konsoli. Trzy naj¬ 
młodsze bity odzwierciedlają stan 
klawiszy: Start (bit O), Select (bit 1) 
lOption (bit 2), przy czym bit zga¬ 
szony oznacza, że klawisz został 
wciśnięty. Na temat innych bitów re¬ 
jestru Consol nie znaleźliśmy żad¬ 
nych Informacji w dostępnych nam 
źródłach. Okazuje się jednak, ze 
przy pomocy bitu 3 można wygene¬ 
rować dźwięk, zmieniając jego stan 
okresowo. Demonstruje to poniższy 
program: 


Procedurę Equ $8800 


List mem 

Equ 

%00000110 

List err 

Equ 

%00000101 

Codę mem 

Equ 

%00010000 

Codę dsk 

Equ 

%00100000 

Consol 

Equ 

$D01F 

Opt List err+Code mem 


Org 

Procedurę 


Ldx 

Txa 

#$00 

Ll 

Eor 

#$0F 


Sta 

Consol 


Ldy 

#$00 

L2 

Dey 



Bne 

Inx 

L2 


Bne 

Rts 

Ll 


End 

of File 


Łatwo zauważyć, ze nie można do¬ 
kładnie określić częstotliwości gene¬ 
rowanego tym sposobem dźwięku. 
Możliwość określenia głośności, wy 
sokości i stopnia zniekształcenia 
dźwięku dają dopiero cztery nieza 
lezne generatory dźwięku. Każdy 
z nich posiada dwa rejestry kontrol 
ne. Pierwszy rejestr, o nazwie 
AUDFjc (x - numer kanału 1 - 4), 
określa częstotliwość pracy danego 
generatora. Standardowo częstotli¬ 
wość dźwięku mierzy się w Hz 
W naszym przypadku mamy do dys¬ 
pozycji tylko Jeden bajt 1 aby wygene¬ 
rować odpowiedni dźwięk trzeba 
skorzystać z zależności: 

częstotliwość = 31960 / (x+1), 





gdzie x to bajt wysyłany do AUDF. 
Natomiast rejestr drugi o nazwie 
AUDCx (gdzie x oznacza również nr 
kanału), określa głośność 1 stopień 
zniekształcenia dźwięku. Bity 0-3 te¬ 
go rejestru określają głośność 
dźwięku, bitem czwartym zajmiemy 
się później, natomiast bity 5-7 steru¬ 
ją zniekształceniami dźwięku. Naj¬ 
wyższa pora, aby podać adresy 
wszystkich ośmiu rejestrów: 

AUDF1 - częst. pracy generatora 1 
AUDC1 - sterowanie generatorem 1 
AUDF2 - częst. pracy generatora 2 
AUDC2 - sterowanie generatorem 2 
AUDF3 - częst pracy generatora 3 
AUDC3 - sterowanie generatorem 3 
AUDF4 - częst. pracy generatora 4 
AUDC4 - sterowanie generatorem 4 

Rejestry te zajmują w pamięci lo¬ 
kacje $D200 - $D207 1 wszystkie są 
rejestrami sprzętowymi, które przy 
odczycie pełnią inną funkcję. 

Poniższy przykład odgrywa dźwię¬ 
ki o losowej częstotliwości, wykorzy¬ 
stując generator 1. 


Procedurę Equ $8800 


List inem 
List err 

Codę mem 
Codę dsk 


Equ %00000110 
Equ %00000101 
Equ %00010000 
Equ %00100000 


Audcl 
Audf 1 
Kbcodes 
Random 
Rtclok 


Equ $D201 
Equ $0200 
Equ $02FC 
Equ $D20A 
Equ $12 


Opt List_err+Code mem 
Org Procedurę 


Sta Audcl 
Rts 

End of File 


Kolejny przykład produkuje 
dźwięki na dwóch generatorach, je¬ 
den ze wzrastającą częstotliwością, 
drugi z malejącą. 


Procedurę 

Egu 

$8800 

List mem 

Egu 

%00000110 

List err 

Equ 

%00000101 

Codę mem 

Equ 

%00010000 

Codę isk 

Equ 

%00100000 

Audcl 

Equ 

$D201 

Audc2 

Egu 

$D203 

Audfl 

Equ 

$D200 

Audf 2 

Equ 

$D202 

Kbcodes 

Equ 

$02FC 

Random 

Equ 

$D20A 

Rtclok 

Egu 

$12 

Opt List err+Code mem 


Org 

Procedurę 


Ldx 

#$00 


Ldy 

#$FF 

Ll 

Lda 

#$AA 


Stx 

Audfl 


Sty 

Audf2 


Sta 

Audcl 


Sta 

Audc2 


Lda 

Rtclok+$02 

L2 

Cmp 

Rtclok+$02 


Beq 

lnx 

Dey 

L2 


Bne 

Ll 


Sty 

Audcl 


Sty 

Rts 

Audc2 


LI Lda Random 

Sta Audfl 
Lda #$AA 
Sta Audcl 
Lda Rtclok+$02 
L2 Cmp Rtclok+$02 

Beq L2 
Lda Kbcodes 
Bmi Ll 
Lda #$00 


End of File 


Oba zaprezentowane przykłady ge 
nerują czyste dźwięki, bez znie¬ 
kształceń Dźwięk czysty otrzymuje¬ 
my, Jeśli bity 5-7 AUDCx ustawione 
są w następujący sposób: 101 lub 
111. Przy innym ustawieniu bitów 





np 100 lub 011, otrzymuje się 
dźwięk zniekształcony. 

Bit 4 AUDCjc zwany jest dwustano¬ 
wym bitem regulacji głośności lub 
kontrolą siły głosu bez modulacji. 
Głośnik wytwarza dźwięk przez 
drgania membrany. Czwarty bit 
AUDCx umożliwia właśnie porusza¬ 
nie membraną głośnika w przód 
i w tył. W ten sposob wytworzyć moż¬ 
na również ciekawe dźwięki, jak 
w przykładzie poniżej: 


Procedurę Equ $8800 


List mem 

Equ 

%00000110 

List arr 

Equ 

%00000101 

Codę mem 

Equ 

1.00010000 

Codę dsk 

Equ 

%00100000 

Audcl 

Equ 

$D201 

Kbcodes 

Equ 

$02FC 

Rtclok 

Equ 

$12 

Opt List err+Code mem 


Org 

Procedurę 

LI 

Ldx 

#$0A 

L2 

Lda 

Tabela,x 


Sta 

Audcl 


Jsr 

Opoz 


Lda 

#$00 


Sta 

Audcl 


Jsr 

Dex 

Opoz 


Bpi 

L2 


Lda 

Kbcodes 


Bmi 

Rts 

LI 

Opoz 

Ldy 

Rtclok+$02 

L3 

Cpy 

Rtclok+$02 


Beq 

Rts 

L3 

Tabela 

Dta 

B($15),B($16) 


Dta 

B($17),B($18) 


Dta 

B($19),B($1A) 


Dta 

B($19),B($18) 


Dta 

B($17),B($16) 


Dta 

B{$15) 


End 

of File 


Kolejne wartości dla AUDC1 po¬ 
bierane są z tabeli Tabela. Po 1/50 
sekundy membrana powrca do sta 
nu pierwotnego, aby po kolejnej 1/50 
sekundy pobrać następną wartość 
z tablicy. 

Ostatni program zamienia klawia¬ 
turę Atarl w klawiaturę syntezatora. 
Klawisz Y odpowiada środkowemu 
C w piątej oktawie (261 Hz) 

Procedurę Equ $8800 

List snem Equ %00000110 
List arr Equ %00000101 
Codę nem Equ %00010000 
Codę dsk Equ %00100000 


Audcl 

Equ 

$D201 

Audf 1 

Equ 

$D200 

Kbcodes 

Equ 

$02FC 

Skstat 

Equ 

$D20F 



Opt List err+Code it 


Org 

Procedurę 

L0 

Ldy 

#$FF 


Sty 

Kbcodes 

LI 

Lda 

Kbcodes 


Bmi 

LI 


Cmp 

#$1C 


Beq 

L5 


Ldx 

#$17 

L2 

Cmp 

Klawisze,x 


Beq 

L3 


Dex 



Bpi 

L2 


Bmi 

L0 

L3 

Lda 

Dźwięki,x 


Sta 

Audf 1 


Lda 

#$AA 


Sta 

Audcl 

L4 

Lda 

Skstat 


And 

#$04 


Beq 

L4 


Lda 

#$00 


Sta 

Audcl 


Sta 

Audf 1 


Beq 

L0 

L5 

Rts 


Klawisze 

Dta 

B ($2C), B ($ 1F ) 


Dta 

B ($2F), B ($ 1E ) 


Dta 

B($2E),B($2A) 


Dta 

B($18 ) ,B( $28) 


Dta 

B($1D),B($2D) 


Dta 

B { $1B ) ,B($2B ) 


Dta 

B ( $0B ) ,B($35 ) 


Dta 

B($0D),B($30) 


Dta 

B($08),B($0A) 


Dta 

B($36),B($0E) 


Dta 

B($37),B($0F) 


Dta 

B($34),B($0C) 

Dźwięki 

Dta 

B($F3),B($E6) 


Dta 

B($D9),B($CC) 


Dta 

B($C1),B($B6) 


Dta 

B($AD),B ( $A2 ) 


Dta 

B($99),B($90) 


Dta 

B($88),B($80) 


Dta 

B( $79 ),B( $72) 


Dta 

B($6C),B($66) 


Dta 

B($60),B($5B) 


Dta 

B($55),B($51) 


Dta 

B ($4C ),B( $48) 


Dta 

B( $44 ),B( $40) 


End 

of File 


W tablicy Klawisze umieszczone 
są kody klawiszy dwóch górnych rzę¬ 
dów klawiatury, a w tablicy Dźwię¬ 
ki - odpowiadające im częstotliwo¬ 
ści. Naciśnięcie klawisza ESC prze¬ 
rywa działanie programu. Naciśnię¬ 
cie klawisza powoduje odszukanie 
jego kodu w tablicy Klawisze wy¬ 
branie odpowiedniego dźwięku 
z tablicy Dźwięki i przesłanie go do 
generatora 1 Dźwięk trwa tak dłu¬ 


go, jak długo naciśnięty jest klawisz. 
Informacja o tym zawarta jest w re¬ 
jestrze Skstat. 

Dodatkowym rejestrem modyfiku 
jącym dźwięk jest rejestr AUDCTL 
($D208) 

Bit O tego rejestru przełącza głów 
ny zegar bazowy z częstotliwości 64 
kHz na 15 kHz, co w praktyce po¬ 
zwala uzyskać nizsze częstotliwości 
dźwięku. 

Bity 1 1 2 to filtry gómoprzepusto- 
we kontrolujące dźwięki 

Bit 3 łączy kanały 3 14 dając 
szesnastobitową zmienną kontrolu¬ 
jącą i tym samym zmniejszając skok 
częstotliwości z 1/256 (jeden bajt) 

do 1/65536 (jedno słowo). 

Bit 4 ma takie samo znaczenie 
Jak bit 3, przy czym łączone są ka 
nały 112. 

Bity 5 16 działają podobnie jak 
bit 0, przy czym zwiększają wyso¬ 
kość generowanego tonu odpowie 
dnio w generatorach 3 i 1 

Bit 7 przełącza licznik 'poły” z 17 
na 9 bitów. Im mniejsza pojemność 
tego licznika, tym częściej powtarza 
ne są zniekształcenia generowanego 
dźwięku 

Używanie filtrów "na własną rękę" 
może być ciekawym eksperymentem 
Rejestr AUDCTL nie został jednak 
opisany tak dokładnie, aby jego mo¬ 
żliwości można było profesjonalnie 
wykorzystać, tym zajmują się pro¬ 
gramy muzyczne. Zaprezentowali¬ 
śmy procedury tworzące proste 
dźwięki, natomiast skomplikowaną 
muzykę, wykonywaną, co ważniejsze 
- na przerwaniach, tworzy się z wy 
korzystaniem np Chaos Musie Com- 
poser’a lub Futurę Composer’a, któ¬ 
re uważamy za najlepsze (nie biorąc 
pod uwagę programów dołączają¬ 
cych dźwięki digitalizowane). 

W następnym artykule rozpocznie 
my juz pisanie naszego dema. Naby¬ 
te dotąd wiadomości pozwolą nam 
zrozumieć w pełni działanie wszy¬ 
stkich procedur 


Tomas z Bielak 
Rafał Bielecki 




"AVALON QUIZ" wzbudził duże 
zainteresowanie. Przysłaliście do 
nas około dwustu prawidłowych roz¬ 
wiązań. Przyznam, ze nie przypusz¬ 
czaliśmy, lz tak wielu z Was zdoła 
ukończyć, trudną przeclez. grę Da¬ 
riusza Żołny Szczęśliwym zwycięzcą 
naszego konkursu został pan Ro¬ 
man Urban z Głowienki, który otrzy¬ 
muje drukarkę mozaikową D--100, 


Lisię pozostałych 
drukujemy poniżej: 


szczęśliwców 


Joysticki: 

Ryszard Cybruch z Tarnobrzega 
Rafał Przetakowski z Koszalina 
Monika Jędro z Konina 
Artur Gładosz z Kołobrzegu 
Krzysztof Mazur ze Świdnicy 

Na grody pocieszenia. 

Krzysztof Buda z Poznania 
Krzysztof Gendasz z Piławy Dolnej 
Artur Cierpiała z Kielc 
Grzegorz Chełstowski z Ostrołęki 
Piotr Prajsner-Prajnar z Wrocławia 
Danuta Piątek z Warszawy 
Przemysław' Żelazko z Głogowa 
Leszek Cyfer (1 Jego Brat) z Poznania 
Kamil Bajzer z Makowa Mazowieckiego 
Grzegorz Pakuła z Bytomia 

Wielu z Was podejrzewało nas 
o kiepski dowcip Wbrew pozorom, 
nie wystarczy podać dowolnego cią¬ 
gu liter jako rozwiązania konkursu. 
To, ze po każdym ukończeniu gry 
pojawia się Inne hasło, nie znaczy 
wcale, ze litery wybierane są losowo. 
Autor gry korzystał wprawdzie z re¬ 
jestru RANDOM 1 odczytywał z niego 
losowe wartości, lecz później podda 
wał je dodatkowej obrobce, dokonu¬ 
jąc na nich operacji logicznych z na¬ 
pisem HANS KLOSS", znajdującym 
się na ekranie. Znalazł się jednak 
ktoś, kto prawie rozszyfrował tę me¬ 
todę. Prawie - ponieważ opis pana 
Wiesława Alabrudzlńskiego z Gdyni 
nie uwzględnia napisu "HANS 
KLOSS". Ponieważ regulamin kon¬ 
kursu nie zabrania użycia progra¬ 



mów pomocniczych, a rozwiązanie, 
nadesłane przez pana Alabrudziń- 
skiego, jest poprawne - postanowili¬ 
śmy przyznać mu specjalną nagrodę 
- niespodziankę. 

Poniżej znajduje się opis nadesła¬ 
ny przez pana Alabrudzlńskiego- 

Wyświetlanie hasła. 

ORG $AA37 


LDY 
TY A 
AND 
STA 
LDA 
AND 
ORA 
AND 
BEQ 
ORA 
CLC 
ADC 
CMP 
BCS 


#$9 

#3 

$AD0C 

$D20A 

#$F 

$ADD0,Y 

#$1F 

1 

#$20 


;RANDOM 


;>=ASC(" A" ) 


;<=ASC("Z") 


$AD0C 
#$3B 
1 

ADC ?$20 
STA $AEFE,Y 
DEY 

BPL 1 


Pętla wykonuje się co najmlej JO ra¬ 
zy, dając w rezultacie dziesięć przy¬ 
padkowych cyfr tworząych hasto. Jeśli 
zawartość $ad09 > =$A, to koniec gry — 
($AD1D)=$9999 
($ADlD+2)=$2000 
($AD1D+4)=$1500 
($AD1D+6)=$1200 
($ADlD+8)=$0999 

Zapraszamy do udziału w nastę¬ 
pnych konkursach. 




List, zamieszczony poniżej, 
przysłał nam pan Jerzy Cyprys 
z Czerwionkl 

Sie ma! 

Jestem byłym użytkownikiem 
ATARI 800 XL. Po czterech la¬ 
tach pracy i zabawy z tym kom¬ 
puterem postanowiłem pójść 
z duchem czasu l kupić AMIGĘ 
Na początku było ekstra, gry, de¬ 
ma, wspaniałe możliwości mu¬ 
zyczne Myślałem "Pogram 
miesiąc, dwa, znudzi ml się 
l złapię się za programowanie". 
Po kilku miesiącach gdy bliżej 
poznałem BASIC, AMOS'a, PA¬ 
SCAL załamałem się. Wszystko 
trzeba było zaczynać od nowa 
Wszystko było inne nlz TURBO 
BASIC XL czy ATARI BASIC Za 
assembler nawet się nie łapałem 
- boję się tego panicznie (mimo 
ze na ATARI programowałem 
dość dobrze w 6502). Obecnie 
katuję Joystick w ROBOCOP'ach 
(l Innych) i z rozrzewnieniem 
wspominam stare, 8-bitowe cza¬ 
sy Gdybym obecnie był w posia¬ 
daniu 800-ki i miał możliwość 
kupna 16-stu bitów nie zrobił¬ 
bym tego (nie kupiłbym AMIGI) 
List ten niech będzie przestrogą 
dla użytkowników ATARI, którzy 
nie tylko meczą MISJĘ i FREDA, 
ale traktują ten sprzęt poważ¬ 
niej Nie dajcie sobie wmówić, ze 
Jest to złom nic nie wart! Z ATA¬ 
RI można Jeszcze wiele wycis¬ 
nąć (przy odrobinie siły lub 
dobrego Imadła), czego życzy 
Wam 

Desperat 


mm 
















REDAKCJA NIE PONOSI ODPOWIEDZIALNOŚCI ZA TREŚĆ ZAMIESZCZANYCH OGŁOSZEŃ. 


Ceny ogłoszeń ramkowych w TA: 

1 cm 2 12 OOO 

Cała strona 6 min. + 100% za kolor 

Ostatnia strona (kolor) 15 min 


Ogłoszenia drobne: 


każde słowo 


5000 


Program dla ATARI XE 1 XL - kosztorysowanie bu¬ 
dowlane (1 min) Wiesław Zbrojewicz, 53-009 
WROCŁAW. TARNINOWA 10. teł. 608-369 


KOŁO FORTUNY - program 
oparty o teleturniej telewizyjny! 
Dodatkowo - gratis - najnowsza 
wersja nieśmiertelnego ROBBO 
Cena (tylko kaseta) - 37000 zł. 
Informacje - koperta zwrotna 
+ 1000 zł (ksero). Adrian Zięt 
klewiez, os Powstań Narodo¬ 
wych 51/9, 61-216 Poznań 


PrenumeraTA 


Liczba egzemplarzy 
każdego numeru 

cena 1 
egzemplarza 

3-mles 

6-mles 

n= 1 

11500 

34500 

69000 

n=2 

10800 

64800 

129600 

n=3 

10350 

93150 

186300 

n=4 

9900 

118800 

237600 

n=5 do 9 

9400 

28200*n 

56400*n 

n=10 lub więcej 

8750 

26250*n 

52500*n 


W celu zamówienia prenumeraty należy wypełnić czytelnie 
blankiet wpłaty na konto (dostępny na pocztach 1 w ban¬ 
kach) podając na odwrocie tmlę, nazwisko 1 adres zamawia 
jącego oraz liczbę egzemplarzy danego numeru wraz z okre¬ 
sem prenumeraty. Pieniądze prosimy wpłacać na konto 


'Tajemnice Atari" s.c. Rzeszów, ul. Targowa 1/801 
Bank Przemysłowo-Handlowy III Oddział Rzeszów 

nr 326807-23650-136 


ATARI 

• Szeroki wybór oprogramowania 

• Nowości 

• Nagrywam w TURBO (AST, 2000) 

• Katalogi gratis (koperta zwrotna + znaczek) 

Mariusz Krawiec, ul Sądecka 18, 20-869 Lublin, teł. 72-03-67 


ROBOsoft 

ul. Wyspiańskiego 37/3 
50-370 Wrocław, tel. (071) 21-22-95 

Oferuje w sprzedaży wysyłkowej 
zabawę na 112 planszach czyli 
najnowszy program przygodowy p t 

ALEX 

Cena (dys k/kaseta) - 40 000 - zł 


Redakcja Tajemnic ATARI informuje, 
ze posiada Jeszcze dużą liczbę egzempla 
rzy archiwalnych czasopisma. Można je 
nabywać wysyłkowo wpłacając plenią 
dze podobnie, jak przy prenumeracie 
(przekazem bankowym na konto podane 
wyżej). Oto wykaz dostępnych numerów 
wraz z cenami 


TA 5/91 

Cena: 6 900 zł 

TA 7/91 

Cena: 6 900 zł 

TA 8/91 

Cena: 8 900 zł 

TA 3/92 

Cena: 9 900 zł 

TA 4/92 

Cena: 9 900 zł 

TA 5/92 

Cena: 9 900 zł 

TA 6-7/92 

Cena: 13 900 zł 

TA 8/92 

Cena: 9 900 zł 

TA 9/92 

Cena: 12 500 zł 

TA 10/92 

Cena: 12 500 zł 

TA 11-12/92 

Cena: 13 900 zł 


ATARI, COMMODORE 

Naprawa komputerów monitorów, peryferii, ltp 

Montaż Turbo Rom do magnetofonów ATARI i Misja, Fred w 1 minucie! 
Dystrybucja gier llrm AVALON, ASF iinnych—. hurt 1 detal 
Sprzedaż komputerów 1 oprogramowania 
Drukarki O-łgłowe M 

1 _ 

KRYSA! & PLUS Kraków, nu Mochnackiego 67, 
ul. Bieżanowska 1 (róg Wielickiej , 

Serwis: ul. Wielicka 57 teL 56-01-17 

Punkty przyjęć: 

Bochnia, ul Florla 12 

Rzeszów, ul Rcjtamf33, sklep "RA 'T"' tyłu DH "SEZAM") 
tel 548-82 wieczorem 

Nowy Sącz, ul Szwtd/ku 1 (Księgarnia "Eureka" w podwórzu) 

Jasło, Rynek 14 AUDIO-VIDEO KARPATY ' 


Redakcja Tajemnic Atari Informuje o możliwości wysyłkowego nabywania 
wszystkich programów zawartych w dowolnym numerze pisma, nagranych na kasetę 
(tylko w transmisji normalnej) lub na dyskietkę W skład zbioru wchodzą wszystkie 
listingi, zamieszczone w wybranym przez Zamawiającego numerze Tajemnic 

Cena wersji kasetowej, a także dyskowej wynosi 30 000 zł W cenę wliczony 
Jest koszt nośnika, nagrania opakowania oraz opłaty pocztowe Same listingi 
są za darmo 

Zainteresowanych ofertą prosimy o dokładne wypełnienie zamówienia (na od 
wrocle) 1 po naklejeniu go na kartę pocztową, wysłanie na adres redakcji po 
dany w stopce 

Uwaga! Prosimy o nleprzysytanle wcześniej należności, będzie ona bowiem re¬ 
gulowana przy odbiorze przesyłki 
















































Gra w konika szachowego jest niemal tak stara. Jak 
sama gra w szachy Polega na przejściu wszystkich pól 
szachownicy zgodnie z ruchami konika szachowego 
z tym, ze nie wolno dwa razy zatrzymać się na tym sa¬ 
mym polu. Standardowa szachownica ma wymiary 8x8 
pól. W programie szchownlca ma wymiar 10 na 10 pól, 
co utrudnia korzystanie z klasycznych rozwiązań. 

Po przepisaniu programu należy dograć do niego 
r Zgrywusa+" i całość uruchomić. Następnie zgrywamy 
program w formacie plikowym Od tej pory jesteśmy po¬ 
siadaczami "Konika". 

Po wczytaniu programu na ekranie ukazuje się sza 
ehownlca z symbolem konika w lewym, górnym rogu. Za 
pomocą klawiszy -,=,+,* możemy ustalić miejsce roz¬ 
poczęcia gry Gdy zostało ustalone, naciskamy klawisz 
spacji, który od tej pory służył będzie do zatwierdzania 
ruchu. Aby zmienić miejsce ruchu konika należy nacis¬ 
nąć klawisz Return a wtedy konik przemieści się na na¬ 
stępną dozwoloną pozycję. W przypadku, gdy wykonanie 
Jakiegokolwiek ruchu jest niemożliwe, w górnej części 
ekranu pojawi się pytanie, czy chcemy spróbować jesz¬ 
cze raz? Wyboru dokonujemy klawiszami t i n Gdy na¬ 
ciśniemy t - wszystko zaczyna się od początku Gdy 
wełśniemy n, to nastąpi powrót do programu nadrzędne¬ 
go (DOS a lub COS a) Grę można opuścić w dowolnym 
momencie naciskając klawisz Esc 

IJ 1000 REM *-* 

GR 1002 REM s KONIK SZACHOWY : 

UD 1004 REM : autor; Tomasz Zalewski ; 

YY 1006 REM : (c) 1992 Tajemnice ATARI : 

JP 1008 REM *-—-* 

GY 1010 DATA ffff008552859b20202020204b 
AB 1020 DATA 6f6e696b20737a6163686f7779 
SS 1030 DATA 9 b 2 8632920313939322054616a 
RE 1040 DATA 656d6e6963652041544152499b 
OW 1050 DATA a9158554a9028555a200a90b9d 
Ol 1060 DATA 4203a9009d4403a9859d4503a9 
YŁ 1070 DATA 2e9d48038a9d49034c56e4e202 
ŁE 1080 DATA e3022e850085148a20ba8920a5 
ŁV 1090 DATA 89a9278595a994859620a£89a9 
KM 1100 DATA 908d07d4a2018e6f02ca8e0cd0 
NS 1110 DATA a90d8dc002a9 3a8d00d08df589 
NU 1120 DATA a 5268 df689a9038dldd0a93a8d 
TK 1130 DATA 2£02a5588584a5598585a002a2 
AV 1140 DATA 00a9519184c8a9529184c8a957 
KL 1150 DATA 9184c016d0f2a945918420bl85 
AC 1160 DATA a002a97c9184c8a9009184c8c0 
RV 1170 DATA 18 d 0 f220bl85a002a9419184c8 
EU 1180 DATA a9529184c8a9539184c016d0f2 
PA 1190 DATA a9 4 4 9 1 8 4 20bl85e8e00ad0cda5 
JI 1200 DATA 8438e92885fl4a002a95a9184c8 
BK 1210 DATA c8a9589184c016d0f6a9439184 
YT 1220 DATA 4c8186a58418692885849002e6 


NQ 

1230 

DATA 

8560adf789c909f00fadf58918 

ww 

1240 

DATA 

69088d00d08df589eef7894c28 

AH 

1250 

DATA 

86adf789c900f0f6adf58938e9 

PE 

1260 

DATA 

088df5898d00d0cef7894c2886 

BJ 

1270 

DATA 

adf889f0f8cef88920a589a595 

KY 

1280 

DATA 

38e9108595a596e900859620af 

PX 

1290 

DATA 

894c2886adf889c909f0d8eef8 

PC 

1300 

DATA 

8920a5S9a59518691085959002 

TM 

1310 

DATA 

e69620afS96010387c7ff0f87c 

KD 

1320 

DATA 

3cl8187eff48a9408582a9bc85 

OW 

1330 

DATA 

S3adf7890aaaa582692b8582a5 

SF 

1340 

DATA 

836900S5S3acf889f010a58218 

JG 

1350 

DATA 

69508582a5836900858388d0f0 

VF 

1360 

DATA 

8aa868d015a9549182eel48aad 

MG 

1370 

DATA 

148ac964f00420f486604c4589 

RZ 

1380 

DATA 

blS260adfc02c90ef016c90f£0 

GE 

1390 

DATA 

18c907f01ac906f01cc921£024 

DK 

1400 

DATA 

c91c£01dd0e320e£854cb38620 

PS 

1410 

DATA 

0d864cb38620bd854eb38620d6 

EL 

1420 

DATA 

8520f4864c81864c7089a90020 

PX 

1430 

DATA 

3586209f894cfa86a9008df989 

YP 

1440 

DATA 

adfc02c90cf00ec921£012c91c 

JR 

1450 

DATA 

f016eec0024cc786adc6028dc0 

PN 

1460 

DATA 

021860adc6028dc00238604c70 

ZV 

1470 

DATA 

89a9ff8dfc0260203d89209f89 

Ol 

1480 

DATA 

ad£789c909£031c908f02dad£8 

JH 

1490 

DATA 

89c909f02620bd8520bd85200d 

EP 

1500 

DATA 

86a901203586d01c20f48620C7 

YA 

1510 

DATA 

869014a900203586209f89209£ 

RR 

1520 

DATA 

894cfa86209b894c4d87209b89 

IE 

1530 

DATA 

4c448720d68520d68520e£85ad 

PU 

1540 

DATA 

f889c908f02ec909f02aadf789 

JZ 

1550 

DATA 

c909f023200d86200d8620bd85 

GT 

1560 

DATA 

a901203586d01920f48620C786 

DB 

1570 

DATA 

9011a900203586209f894cfa86 

FA 

1580 

DATA 

209b894c9787209b894c8e8720 

PW 

1590 

DATA 

d68520ef8520ef85adf889c908 

GL 

1600 

DATA 

f02cc909f028adf789f023200d 

FA 

1610 

DATA 

86 200d86 20d68 5a901203586d0 

QH 

1620 

DATA 

1920f48620c7869011a9002035 

LG 

1630 

DATA 

86209f894cfa86209b894cdf87 

QM 

1640 

DATA 

209b894cd68720ef8520ef8520 

pp 

1650 

DATA 

bd85adf889c909f02cad£789f0 

OQ 

1660 

DATA 

27c901f023200d8620d68520d6 

PA 

1670 

DATA 

85a901203586d01920f48620c7 

PY 

1680 

DATA 

869011a900203586209f894cfa 

ZD 

1690 

DATA 

86209b894c2788209b894cle88 

ET 

1700 

DATA 

20ef8520bd8520bd85adf889£0 

CD 

1710 

DATA 

2cadf789f027c901£02320e£85 

SG 

1720 

DATA 

20d68520d685a901203586d019 

NN 

1730 

DATA 

20f48620c7869011a900203586 

QX 

1740 

DATA 

209f894cfa86209b894c6d8820 

KL 

1750 

DATA 

9b894c6488200d8620bd8520bd 

PA 

1760 

DATA 

85adf889f02cc90l£028adf789 

NH 

1770 

DATA 

f02320ef8520e£8520d685a901 

LW 

1780 

DATA 

203586d01920f48620C7869011 

EU 

1790 

DATA 

a900203586209f894cfa86209b 

UD 

1800 

DATA 

894cb388209b894caa88200d86 

FY 

1810 

DATA 

200d8620bd85ad£889f02ec901 

MK 

1820 

DATA 

£02aadf789c909£02320ef8520 

ZE 

1830 

DATA 

efS520bd85a901203586d01920 

XE 

1840 

DATA 

f48620c7869011a90020358620 

JJ 

1850 

DATA 

9£894c£a86209b894cfb88209b 

TT 

1860 

DATA 

894cf288200d86200d8620d685 

WC 

1870 

DATA 

adf889f03aadf789c909f033c9 

ZX 

1880 

DATA 

08f02f20ef8520bd8520bd85a9 

OO 

1890 

DATA 

01203586£0034c318920f48620 

DO 

1900 

DATA 

c786900ba900203586209£894c 

SM 

1910 

DATA 

fa86200d8620d68520d6854cfa 

EJ 

1920 

DATA 

86ad£989c907£00e60a08ca20b 

GV 

1930 

DATA 

bd098a915888cal0f7a03ba20e 

UL 

1940 

DATA 

bdfa89915888cal0f7adfc02c9 

SL 

1950 

DATA 

2d£018c923£006c9lcf002d0ef 

WL 

1960 

DATA 

20f48620e089a9008d00d06c0a 

PR 

1970 

DATA 

0020f486a9008df3898d£4898d 

PU 

1980 

DATA 

f5898df6898df7898df8898dl4 

NU 

1990 

DATA 

8a4c0385eef98960a9008df989 

LL 

2000 

DATA 

60a2008a9d0094cad0fa60a00b 

RO 

2010 

DATA 

b9298691958810f86020cf89a2 

so 

2020 

DATA 

04a000bl91918e88d0f9e692e6 

HZ 

2030 

DATA 

8fcad0f2a5588591a5598592a9 

VQ 

2040 

DATA 

15858ea98a858f60a204a000bl 

YF 

2050 

DATA 

8e919188d0£9e692e68fcad0f2 

NQ 

2060 

DATA 

600000000000000080aae5f3fa 

RR 

2070 

DATA 

e3fae580f2el£a809f80808080 

HD 

2080 

DATA 

a2b2alb7af80808000e002el02 

KP 

2090 

DATA 

0085 


Tomasz Zalewski 












Vicky 


■Vk ky” to nowa doskonała gra komnatowa która z pewno¬ 
ścią zasługuje na uznanie nawet najbardziej wymagającye h i wy 
brednyc h graczy Jej autor zadbał o dopracowanie wszystkich 
lstotnye h elementów Akc ja rozgrywa sit, w mielcu dość nieco 
dziennym (nie (ho, 1 zdradzać zbył wiciu szczegółów gra Jesl 
absolutną nowością 1 kupu|acym |a osobom nalez\ sic,- nlt wlel 
ka niespodzianka) a sama grę poprzedza doskonale wykonane 
lntro - rzecz raczej rzadko spotykana w grac h na mali Alarl 
Jest przykładem znakomitej grafiki 1 bardzo ładnej animacji, 
niestety ucieszy ona oko tylko posiadaczy stacji dysków Wla 
ścielcie magnetofonów nie powinni Jednak w tym momt ncic re 
zygnować z zakupu "Vlc kyego" ponieważ z wysokim poziome m 
grafiki 1 animacji mamy elo czynienia nie tylko wc wstępie do 
gry ale także przez cały czas wędrówki po przedziwnej krainie 
do której trafiamy wraz z rizle Inym młodym Wikingit m Doelal 
kową atrakcję stanowi znakomita muzyka autor postarał się 
o urozmalcente Jej przez wykorzystanie sampllngu co tlało Iiar 
dzo Interesujące efekty Gra wymaga dużej koncentrac ji uwagi 
1 spostrzegawczości pomyślne wypełnię nie misji nlt Jest prosie 
To zadanie naci którym mogą łamać sobie głowę (1 joystick) na 
wet najbardziej doświadczeni weterani Warto Jednak zadać so¬ 
bie trochę trudu gdyż /abawa Jest naprawdę doskonała N ijle- 
plej przekonać się o tym same mu 



Szperacz dyskowy 


Szperacz dyakowy Jest programem uzyt kowym olisługu jącym 
szeroko pojęte operacje dyskowe Program przeznac zony Je st do 
pracy przede wszystkim z dyskietkami o standardzie zapisu 
DOS-u 2 5 lub kompatybilnego Mozo naturalnie “szperać' welys 
kietkach zapisanych Innym DOS-cm Jednakże wtedy wywołanie 
niektórych opcji Jest niewskazane (np weryfikacja zapisanyc h pil 
ków) Szperacz obsługuje dyskietki sformatowane w gęstość jacłi 
pojedynczej rozszerzonej oraz podwójnej Zasadniczo program 
grupuje wszystkie operacje dyskowe możliwe do wykonania na 
małym ATARI Poza realizacją działań które oft rują inne progra 
my typu Dlsk Utlllty to narzędzie zawiera szereg niespotykanych 
dotąd opc ji Przykładowo należą do nich 

• Rekonstrukcja katalogu dyskowego C/.asem zdarza się 
że DOS 2 5 niszczy częściowo lut) w całości spis plików 
zawartych na dyskietce Opcja ta. “lalkom dyskowym 
zwraca niemożliwe do odzyskania zbiory natomiast fa 
rhowrom zaoszczędza masę czasu 

• Optymalizacja dysku Po poprawnym zakończeniu tej ope 
racji wszystkie dane Jednego pliku są zgrupowane w jed 
nym rejonie dyskietki co w przypadku długich plików 
znacznie przyspiesza lc h ode zyt 

• Sortowanie plików Opcja umożliwia ułożenie nazw pil 
ków w katalogu dyskowym według uznania użytkownika 

Reasumując Szperacz dyskowy jest wygodnym 1 łatwym w ob- 
słudze narzędziem oferującym wszystkie operacje dotycząc* stacji 
dysków Jeśli Ją posiadasz to NIE mc rzesz nlt mleć tego programu 



Magnetofon kasetowy, jako pamięć masowa do kom 
putera należy juz niewątpliwie do przeżytków. Jednak 
niska cena skłania wielu użytkowników do Jego zakupu 
Sekwencyjny zapis i cxiezyt, mała prędkość transmisji, 
niska jakość zapisywanego sygnału, a co z tym się wiąże 
duża ilość błędów, to ogrom wad, które przynosi uzyt 
kownlk do domu wraz z magnetofonem Problemu se¬ 
kwencyjnego zapisu i odczytu nie udało się na razie roz¬ 
wiązać (a przynajmniej nie ml na ten temat nie wiado¬ 
mo) Sposoby na radzenie sobie z błędami były juz 
przedstawiane na łamach TA (programy 'Easy Come" 
1 "100%") Dziś chciałbym zaprezentować rozwiązanie 
problemu prędkości zapisu na kasetę 

Prezentowany lu program "Baud Ratę Selector' Jest re¬ 
zydentną nakładką systemową, która ładuje się na 
mcmlo 1 pozwala na zmianę prędkości transmisji w za¬ 
kresie 600, 900 oraz 1200 bodow (hitów na sekundę) 
Można korzystać również z innych prędkość 1 ale o tym 
nieco dalej Cenną zaletą tego programu jest to ze przy¬ 
spieszony zapis może <x1bywae się pcxl kontrolą Innego 
dowolnego programu, który nie niszczy zawartość 1 pa 
mięc i komputera Nakładka przeznaczona jest zasadni¬ 
czo dla programów pracujący! h w trybie GRAPHICS 
0 lassembler koplery) lecz możliwe Jest korzystanie 
z innyc h trybów graficznych W takim przypadku na 
ekranie poławiają się czasami śmieci. Prędkość- zapisu 
wybieramy przy pomcx-y klawiszy Shift + ATARI Logo. 
Po wciśnięciu leh w górnej części ekranu pojawi się linia 
z wartością aktualnej prędkości Linia ta zniknie po na 
ciśnlęelu dowolnego klawisza, nie będącego klawiszem 
sterującym dla “Selec-tora" Aktualną prędkość transmi 
sjl txv jej zmiany możemy podglądnąć wciskając kombi 
nac ję klawiszy Shift + Caps. 

Po przepisaniu programu nagrywamy go dla bezpie 
ezenstwa, dołączamy do niego program "ZGRYWUS+" 






z TA 2/92 i po uruchomieniu ZGRYWUSA" zgrywamy 
program Jako 'format plikowy (file)". Po udanej operacji 
zapisu jesteśmy posiadaczami "Selectora". Maksymalna 
prędkość transmisji jest cechą Indywidualną każdego eg¬ 
zemplarza magnetofonu więc przed rozpoczęciem maso¬ 
wego zapisu danych na kasetę powinniśmy najpierw 
przetestować magnetofon. W tym celu pod kontrolą COS- 
a lub DOS a wczytujemy do pamięci program "Selector”, 
następnie program kopiujący (najlepiej DUP.COM lub 
APD COM) Do programu kopiującego ładujemy dowol¬ 
ny. w miarę krótki plik po czym ustalamy prędkość 
transmisji na 1200 bodów 1 zapisujemy plik z kopiera na 
taśmę dobrej jakości. Następnie próbujemy kilkakrotnie 
odczytać zapisany plik Jeżeli to się udaje możemy po¬ 
przestać na prędkości 1200 bodów lub spróbować zapi 
sywać nieco szybciej. W tym celu należy wczytać program 
"Patcher” (TA 11 12/92), dopisać do niego poprawkę 
"Fast" i całość uruchomić. Do "Patchera" ładujemy "Se- 
lector", który zostaje poprawiony tak, aby można było 
operować prędkościami 600. 1000 1 1400 bodów. Przy 
prędkości 12001 1400 bodów powinno się jednak stoso¬ 
wać taśmy dobrej jakości W przeciwnym razie będziemy 
narażeni na utratę danych. Jeśli jednak nie udaje nam 
się odczytywać plików zapisanych z prędkością 1200 bo¬ 
dów można postąpić jak wyżej z tym, ze zamiast popra¬ 
wki "Fast" dopisujemy do "Patchera" poprawkę "Slow", 
która spowoduje, ze "Selector" będzie operował prędko¬ 
ściami 600, 800 oraz 1000 bodów 

Dla ciekawych. Po załadowaniu "Selector” wyszukuje 
w hatabs adres tablicy obsługi handlera ”C:", po czym na 
jej podstawie tworzy własną - ze zmodyfikowanymi pro¬ 
cedurami OPEN 1 CLOSE. Adres nowej tablicy jest do¬ 
czepiany do standardowego handlera, przez co nie zaj¬ 
muje dodatkowego miejsca Przyspieszenie transmisji 
polega na modyfikacji przerwania szyny szeregowej vse- 
rinl 1 odpowiednim ustawianiu częstotliwości pracy reje¬ 
strów POKEY-a podczas transmisji. Aby umożliwić pra¬ 
cę programu również ze stacją dysków zmiana przerwa¬ 
nia dokonywana jest dopiero wtedy, gdy otwieramy ka¬ 
nał dla urządzenia "C:\ a przywrócenie starego wektora 
następuje tuz po jego zamknięciu. Klawisze sterujące są 
przekazywane "Selectorowf przez przerwanie klawiatu¬ 
ry Program odporny jest na ciepły start komputera. Po¬ 
wodzenia w turbowaniu. 

IJ 1000 REM *- -* 

XB 1002 REM : BAUD RATĘ SELECTOR : 

KN 1004 REM : autor: Marek Pasek : 

YY 1006 REM : (c) 1992 Tajemnice ATARI : 

JP 1008 REM *-* 

RQ 1010 DATA ffff009073934c0690200390a2 
QO 1020 DATA 01bd08029dcd90bd8a919d0802 
BI 1030 DATA cal0fIad9291850cad9391850d 
PM 1040 DATA ad9c918de702ad9d918de802ad 
WQ 1050 DATA 90918da291ad91918da391a200 
FA 1060 DATA bdla03c943f005e8e8e8d0f48e 
CM 1070 DATA 0a92bdlb0385cbbdlc0385cca0 
VH 1080 DATA 00blcbl869018d759108c8blcb 
CB 1090 DATA 2869008d7691c8blcbl869018d 
BW 1100 DATA 789108c8blcb2869008d7991a0 
AC 1110 DATA 04blcb99ec91c8c00cd0f6ad98 
YO 1120 DATA 918dec91ad99918ded91ad9a91 
DD 1130 DATA 8dee91ad9b918def91ae0a928e 
UC 1140 DATA 0892a9439dla03ad96919dlb03 
KS 1150 DATA ad97919dlc036c0a008a48a542 
EM 1160 DATA d00bad09d2c967f009c97cf029 
DL 1170 DATA 68aa4ccc90aeea91bdf8918d06 
GZ 1180 DATA 92bdf9918d0792bdfe918dcc91 
VJ 1190 DATA bdff918dcd91e8e8e006f0358e 
BD 1200 DATA ea91ad8c918d0802ad8d918d09 


CY 1210 DATA 02ad30028d0492ad31028d0592 
JH 1220 DATA a5588da691a5598da791ad8891 
ZH 1230 DATA 8d3002ad89918d310268aa6840 
XP 1240 DATA a9008dea91f0c78a48ad04928d 
MA 1250 DATA 3002ad05928d3102ad8a918d08 
CE 1260 DATA 02ad8b918d09024cbf90ad0692 
VC 1270 DATA 8d04d2ad07928d06d24c559108 
YB 1280 DATA 48ad0c028d5691ad0d028d5791 
PC 1290 DATA ad8e918d0c02ad8f918d0d0268 
US 1300 DATA 284c7491207791ad56918d0c02 
XK 1310 DATA ad5 7 918d0d02 6000a09lb9 902c 
HV 1320 DATA 914991c2910390d691ec915791 
ID 1330 DATA 76910992000070460000704240 
OZ 1340 DATA bc020202020202020202020202 
MH 1350 DATA 020202020202020202020241a0 
UF 1360 DATA 910000000073706565641al016 
AM 1370 DATA 10100000000000000000000000 
QU 1380 DATA 747572626f006f666600000000 
ZU 1390 DATA 00000000000000000000000000 
AQ 1400 DATA 000000cc05bb04fa0310161019 
KS 1410 DATA 11120000000000000000a200a9 
UW 1420 DATA 0b9d4203a97d9d48038a9d4903 
LC 1430 DATA a93e9d4403a9929d45032056e4 
WH 1440 DATA a50c8d0490a50d8d0590ade702 
UK 1450 DATA 850cade802850d609b42617564 
QP 1460 DATA 20526174652053656c6563746f 
QG 1470 DATA 7220322e33206279204d502773 
WC 1480 DATA 9b202020286329203139393320 
VA 1490 DATA 54616a656d6e69636520415441 
DW 1500 DATA 52499b9b53686966742f4c6f67 
LO 1510 DATA 6f202d206368616e6765206261 
KS 1520 DATA 756420726174652c9b53686966 
JT 1530 DATA 742f43617073202d2064697370 
RT 1540 DATA 6c617920626175642072617465 
SD 1550 DATA 2e9b9b200c92a93c8dbb92a900 
VZ 1560 DATA 85cfade70285d4ade80285d538 
JV 1570 DATA a90085d2e5d485d0a99085d3e5 
CY 1580 DATA d585dla000f0033866cfa5d2c9 
TZ 1590 DATA bba5d3e99290036ce70224ęf70 
GQ 1600 DATA 633027bld285ce91d4206793aa 
YW 1610 DATA f0dec920f017c940f0d9c960f0 
XM 1620 DATA d5290dc908f0cf90418a291fc9 
SM 1630 DATA 09f03abld2c8c900bld288e990 
LH 1640 DATA 9012bld2c8c9bbbld288e992b0 
MF 1650 DATA 06a5d0a6dl900724cf30ala900 
LT 1660 DATA aa85d686d738bld2e5d691d420 
ER 1670 DATA 6793bld2e5d74c5f93bld291d4 
TZ 1680 DATA 2067934ce992e6d2d002e6d3e6 
OA 1690 DATA d4d002e6d560e002el02bb92 


A oto wspomniane w tekście poprawki 


AN 

1000 

REM SLOW do Selectora 

HH 

1010 

DATA 

512,187,67 

SS 

1020 

DATA 

513,4,5 

ZM 

1030 

DATA 

514,250,90 

SS 

1040 

DATA 

515,3,4 

PE 

1050 

DATA 

519,25,24 

HU 

1060 

DATA 

521,18,16 



RF 

1000 

REM FAST do Selectora 

EC 

1010 

DATA 

512,187,90 

SB 

1020 

DATA 

513,4,4 

HZ 

1030 

DATA 

514,250,0 

RK 

1040 

DATA 

515,3,2 

CIF 

1050 

DATA 

518,16,17 

QB 

1060 

DATA 

519,25,16 

KF 

1070 

DATA 

521,18,20 



Marek Pasek 










Wszyscy posiadacze stacji dysków wydają komputero 
wi polecenia wypisania na ekranie zawartości dyskietki 
(zazwyczaj DIR) Jego wykonanie powoduje często poją 
wienie się wielu nazw, wśród których trudno jest do¬ 
strzec tę jedną - poszukiwaną. Tę ewidentną niedogod 
ność usuwa niniejszy program 

Dopisanie na dyskietce kolejnego pliku powoduje naj¬ 
częściej umieszczenie jego nazwy jako ostatniej w kata 
logu dyskowym (tzw, directory) Programy obsługujące 
instrukcję DIR lub podobną, wypisują nazwy według po¬ 
rządku ich występowania. Wynika więc stąd, ze wygląd 
listy nazw plików jest uzależniony od kolejności ich zapi 
su na dyskietce. File Sorter pozwala na ułożenie nazw 
plików w dowolnej kolejności Można ułożyć je alfabety 
cznie, biorąc pod uwagę nazwy i rozszerzenia, bądź też 
według własnego uznania. Po uruchomieniu programu 
należy włożyć do stacji dysków dyskietkę z plikami, któ- 
ych nazwy chcemy uporządkować, potem nacisnąć do¬ 
wolny klawisz, Wyświetlona zostanie zawartość dysku, 
teraz można nazwy poukładać Znaczenie aktywnych 
klawiszy 

A - ułożenie nazw w kolejności alfabetycznej. 

Z - jak wyżej, ale od Z do A. 

R - działa tak, jak klawisz A, ale dotyczy rozszerzeń. 

F - jak wyżej, ale od Z do A. 

RETURN - "zaczepienie" lub "odczepienie nazwy. Po 
prawej stronie nazwy, w pustej kolumnie pojawia się lub 
znika strzałka, informująca o statusie nazwy. Naciśnię¬ 
cie klawisza RETURN spowoduje "zaczepienie" pliku 
wskazywanego przez rozjaśnienie i pozwoli na przesu¬ 
nięcie nazwy przy pomocy klawiszy -1 =, Ponowne wciś¬ 
nięcie klawisza RETURN "odczepi" nazwę. Plików nie¬ 
aktywnych (np skasowanych) nie można zaznaczyć. 

S - rozpoczęcie procesu układania nazw Ze względu na 
sposób zapisu pliku przez DOS, program musi poczynić 
pewne kosmetyczne zabiegi na dyskietce, ich zaawanso 
wanie będzie wskazywane przez procentowy wynik Po 
zakończeniu operacji można "układać' kolejną dyskietkę 
lub wyjść z programu, 

ESC - sortowanie nowej dyskietki 
W - wyjście z programu. 

Po lewej stronie nazwy znajduje się pusta kolumna, 
w której pojawiają się czasem litery 


N - plik jest nieaktywny, nie można go "zaczepić". 
X - plik pusty, jego nazwa będzie ignorowana. 
t nielegalny status pliku. 


Na koniec kilka ostrzeżeń Dyskietka z plikami powin 
na być zapisana w formacie DOS-u 2 5 (w przypadku 
wątpliwości, program wypisze odpowiedni komunikat) 
1 koniecznie zweryfikowana, np programem "Szperacz 


M dyskowy", opisanym w tym numerze TA. Należy mieć 
świadomość faktu, że jeśli w trakcie układania nazw 


program zostanie zaskoczony zanikiem napięcia zasila¬ 


jącego, awarią sprzętu itp., to zawartość dysku może 
ulec częściowemu zniszczeniu. Dlatego też w przypadku 
ważnych plików radzę wykonać kopię bezpieczeństwa 
dyskietki. Nazwy plików nieaktywnych zostaną wymaza 
ne z katalogu, w następstwie czego odtworzenie skaso¬ 
wanych zbiorów (co oferują niektóre programy) będzie 
bardzo trudne. Niemożliwe jest posortowanie nazw. Jeśli 
status jednej z nich jest nielegalny 

Mam nadzieję, że po ułożeniu w katalogu dyskowym 
nazw plików według naszego uznania, problemy ze zna¬ 
lezieniem tej jednej pośród wielu staną się juz historią. 


IJ 1000 rem *- 1 

DU 1002 REM : FILE SORTER 

WU 1004 REM : autor: Leon 

YY 1006 REM : (c) 1992 Tajemnice ATARI 

JP 1008 REM *- ł 

GU 1010 DATA f f f f800482044C008000806c8c 
IJ 1020 DATA a9108dd902a9038dda02ae0103 
WS 1030 DATA d001e8a20186eIa90085d4a9 9 9 
JG 1040 DATA 85d520168aa201202488207489 
CG 1050 DATA 293fc91cd0034ce880a9bda28d 
EG 1060 DATA 204d83204b851008209189b0ef 
VA 1070 DATA 4c2480a968a20185d286d3208d 
XC 1080 DATA 8430d3ad6d8cc902f016a20320 
GA 1090 DATA 2488207489293f4820ec8868c9 
DX 1100 DATA Icd0034ce8801820ed8430b0a9 
CO 1110 DATA 3f85d9206484a000bldbf010c9 
QM 1120 DATA 80f00c29dfc903f006a080c942 
GQ 1130 DATA d006c6d910e3a00084e520ec88 
UL 1140 DATA a202202488a206202488a903a2 
RS 1150 DATA 03206989a002a95891d0a00b91 
ZD 1160 DATA d0a00f91d0209582a9bda29185 
YE 1170 DATA ca86cba90085d985d785da2090 
QQ 1180 DATA 83207489293f900920ec8820ec 
AU 1190 DATA 884clf80c92ed00c20ec8820ec 
QN 1200 DATA 88a9e08df40260c93ed01520ec 
KD 1210 DATA 88a5e53008a20520248820ac85 
DQ 1220 DATA 20ec884clf80c93fd01da0b0a9 
SR 1230 DATA Cda282488c718298a0b02920f0 
QA 1240 DATA 02a0908c7382682041824cbe80 
EV 1250 DATA C928d009a0b0a9dda2824cl481 
IM 1260 DATA c917d005a0904cl081c938d005 
RJ 1270 DATA a0904c3181c90fd060a5d9c93f 
XO 1280 DATA b04aa5daf03ca6d9bd7d8dbc7e 
FY 1290 DATA 8d9d7e8d989d7d8da5d70a0a0a 
GG 1300 DATA 0al865ca85cca5cb690085cda5 
LS 1310 DATA ccl8691085dba5cd690085dca0 
AM 1320 DATA 0fblcc48bldb91cc6891db8810 
CR 1330 DATA f3e6d9a5d7c907b005e6d74cce 
NP 1340 DATA 80a5cal8691085ca90f4e6cbb0 
YW 1350 DATA f0c90ed05ba5d9f0e8a5daf03c 
HC 1360 DATA a6d9bd7d8dbc7c8d9d7c8d989d 
DH 1370 DATA 7d8da5d70a0a0a0al865ca85cc 
TJ 1380 DATA a5cb690085cda5cc38e91085db 
PZ 1390 DATA a5cde90085dca00fblcc48bldb 
KT 1400 DATA 91cc6891db8810f3c6d9a5d7f0 
ON 1410 DATA 04c6d7109ea5ca38e91085cab0 
YW 1420 DATA 95c6cb9091c90cd02da5daf006 
AJ 1430 DATA a90085daf023a5d70a0a0a0al8 
GV 1440 DATA 65ca85cca5cb690085cda000bl 
FM 1450 DATA Oc29dfc903f004c942d004a9ff 
ZQ 1460 DATA 85da4cce808d6f828e7082a900 
NW 1470 DATA 85d7204983203e83a90085d920 
VE 1480 DATA 0283b03a20f582a5d985d8e6d9 
DX 1490 DATA a5d9c940b00c200283b00720cd 
AV 1500 DATA 82b0e790eca6d7a5d89d7d8da4 
GN 1510 DATA d7e6d7a9bda291206a84a00fb9 
HZ 1520 DATA 6d8d91db8810f84C5182601820 
WE 1530 DATA 6183203e83a90085cca9bd85db 
QZ 1540 DATA a99185dc202a83b019a6cc8a9d 
KN 1550 DATA 7d8dc93fb015e6cca5dbl86910 
II 1560 DATA 85db90e6e6dcb0e2a5ccc93f90 
XK 1570 DATA eb60a005b96d8ddldbd006c8c0 
RJ 1580 DATA 1090f41860a00db96d8ddldbd0 
EA 1590 DATA 0ac8c010b006c00dd0f01860a0 
SZ 1600 DATA 05d0eaa000bldb996d8dc8c010 
JF 1610 DATA 90f660201a83900a206484202a 
XJ 1620 DATA 83900af008e6d9a5d9c94090e9 
VM 1630 DATA 60a000b97d8dc5d918f005c8c0 
XQ 1640 DATA 4090f360a000bldbf00c29dfc9 
1F 1650 DATA 03f004c942d00218603860a03f 
TY 1660 DATA a980997d8d8810fa60a9bda291 
XG 1670 DATA 85cc86cda203a0009891ccc8d0 
YM 1680 DATA fbe6cdcal0f660a9bda28d9004 
CH 1690 DATA a9bda29185db86dca9bda28db0 
MG 1700 DATA 04a9bda29185cc86cda203a000 
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wo 

1710 

DATA 

bldb91ccc8d0f9e6dce6cdcal0 

MI 

2620 

DATA 

TG 

1720 

DATA 

f260a0f£84dfe6d£a4dfa9bda2 

AV 

26 30 

DATA 

MW 

1730 

DATA 

91206a84a000bldbd0efa9c4a2 

UR 

2640 

DATA 

RU 

1740 

DATA 

01206989a5ca85dba5cb85dc38 

ER 

2650 

DATA 

QR 

1750 

DATA 

a5d9e5d785d8a96d85cca98d85 

TK 

2660 

DATA 

SA 

1760 

DATA 

cda2008a48a200a5d8c5dfb006 

ZS 

2670 

DATA 

VS 

1770 

DATA 

a000bldbd004a2 3 8d014 a2 2 ec9 

UD 

2680 

DATA 

ZA 

1780 

DATA 

80f00ea20029dfc903f006c942 

KK 

2690 

DATA 

KA 

1790 

DATA 

f002a21f8e6d8da200a005bldb 

QU 

2700 

DATA 

WR 

1800 

DATA 

20b6899d6f8dc8e8e00890f2e8 

ZY 

2710 

DATA 

NU 

1810 

DATA 

bldb20b6899d6f8dc8e00b90f2 

GB 

2720 

DATA 

OS 

1820 

DATA 

a5dbl8691085db9002e6dc6848 

GQ 

2730 

DATA 

XX 

1830 

DATA 

C5d7d00da20fbd6d8d09809d6d 

UW 

2740 

DATA 

LJ 

1840 

DATA 

8dcad0f5a200a5daf0086848c5 

EG 

2750 

DATA 

DG 

1850 

DATA 

d7d002a24d8e7c8da97c8d6e8d 

GO 

2760 

DATA 

QH 

1860 

DATA 

8d778d8d7b8da00fb96d8d91d0 

XD 

2770 

DATA 

VT 

1870 

DATA 

8810f8204d89e6d868aae8e008 

UH 

2780 

DATA 

ZL 

1880 

DATA 

b0034cc58360a4d9a9bda28d85 

ws 

2790 

DATA 

ZI 

1890 

DATA 

db86dc9829304a4a4a4a65dc85 

cz 

2800 

DATA 

LN 

1900 

DATA 

dc9 8 2 90f0a0a0a0a65db8 5db90 

ER 

2810 

DATA 

NT 

1910 

DATA 

02e6dc60a050d002a052a96da2 

BO 

2820 

DATA 

TR 

1920 

DATA 

8c8c02038d04038e0503a5el0a 

JR 

2830 

DATA 

TR 

1930 

DATA 

0aa9002a8d09034a6 a4 9 80206 a 

SE 

2840 

DATA 

NQ 

1940 

DATA 

85a5d38d0b03d00fa5d2c904b0 

ID 

2850 

DATA 

QG 

1950 

DATA 

09a9808d08030a8d0903a9ff85 

QQ 

2860 

DATA 

KT 

1960 

DATA 

e2ad09034a66e2a5d28d0a0320 

WI 

2870 

DATA 

FO 

1970 

DATA 

59e4181013a5cd48a5cc482091 

IN 

2880 

DATA 

EJ 

1980 

DATA 

896885cc6885cdb0b3a0ff9860 

AW 

2890 

DATA 

CU 

1990 

DATA 

a9bd85cca98d85cda96985d2a9 

HR 

2900 

DATA 

BM 

2000 

DATA 

0185d3a080a900996d8cc8d0fa 

AF 

2910 

DATA 

JJ 

2010 

DATA 

0828089007208e85301al00520 

YO 

2920 

DATA 

GQ 

2020 

DATA 

9b853013a5ccl8698085cc9002 

JK 

2930 

DATA 

XQ 

2030 

DATA 

e6cde6d2a5d2c97190dd289818 

FA 

2940 

DATA 

OT 

2040 

DATA 

60a9538d0203a904206a85a9ea 

JR 

2950 

DATA 

SL 

2050 

DATA 

8d0403a9028d0503a9008d0903 

PX 

2960 

DATA 

WY 

2060 

DATA 

4c59e4202f853019adea02a2c0 

KB 

2970 

DATA 

PU 

2070 

DATA 

2 9 20d009a200adea023002 a2 80 

NK 

2980 

DATA 

BG 

2080 

DATA 

8a0d010385el98608d0803a931 

IH 

2990 

DATA 

VK 

2090 

DATA 

8d0003a9808511ae0203e050f0 

ox 

3000 

DATA 

QM 

2100 

DATA 

014a8d0303a9e08d0603a5el29 

PS 

3010 

DATA 

NE 

2110 

DATA 

0f8d010360a000blcc996d8cc8 

EE 

3020 

DATA 

OB 

2120 

DATA 

10£84c8984208d84 300ba000b9 

RY 

3030 

DATA 

LG 

2130 

DATA 

6d8c91ccc810f88860a90085df 

BU 

3040 

DATA 

WF 

2140 

DATA 

85e085dd85dea20086d8a5d848 

cv 

3050 

DATA 

zo 

2150 

DATA 

bc7d8d3018dd7d8df013206684 

KR 

3060 

DATA 

AR 

2160 

DATA 

a001bldbl865dd85ddc8bldb6 5 

NZ 

3070 

DATA 

WE 

2170 

DATA 

de85de6885d8aae8e04090d5a2 

CJ 

3080 

DATA 

FH 

2180 

DATA 

07202488a20086da8a4885d9bc 

FI 

3090 

DATA 

xw 

2190 

DATA 

7d8d84d83035dd7d8df030206 6 

ux 

3100 

DATA 

KX 

2200 

DATA 

84a003bldb85d2c8bldb85d3a5 

KA 

3110 

DATA 

HT 

2210 

DATA 

d348a5d24818208c86305b6885 

AV 

3120 

DATA 

PC 

2220 

DATA 

d26885d338208c863051a90185 

EJ 

3130 

DATA 

JB 

2230 

DATA 

e5a5d205d3d0de68aae8e04090 

NV 

3140 

DATA 

VU 

2240 

DATA 

b9a9bd85cca99185cda90085d9 

DH 

3150 

DATA 

SJ 

2250 

DATA 

206 484a000bldb29dfc903 f 00d 

WD 

3160 

DATA 

TL 

2260 

DATA 

c942£009a00fa90091db8810£b 

OT 

3170 

DATA 

ZB 

2270 

DATA 

e6d9a5d9c94090de3820618338 

TN 

3180 

DATA 

zw 

2280 

DATA 

20ed84300920ec884cec886868 

BV 

3190 

DATA 

IE 

2290 

DATA 

6820ec88a5e5f00e20ec882056 

YJ 

3200 

DATA 

CI 

2300 

DATA 

f5a2082024882074894cec88a9 

CS 

3210 

DATA 

PH 

2310 

DATA 

00a26685cc86cda927a2879004 

YX 

3220 

DATA 

CY 

2320 

DATA 

a930a2878dfd868efe86b02ea2 

FP 

3230 

DATA 

RX 

2330 

DATA 

0086dce886dba5db85e3a5dc85 

IY 

3240 

DATA 

BB 

2340 

DATA 

e4a912a6el3002a91al865db85 

UL 

3250 

DATA 

PH 

2350 

DATA 

db9002e6dca4dcc4d390eld006 

YO 

3260 

DATA 

co 

2360 

DATA 

c5d2 90db£0d9a5d3aa05d2 f04 9 

OG 

3270 

DATA 

UW 

2370 

DATA 

a5d2e4e49043d004c5e3903de4 

TF 

3280 

DATA 

TZ 

2380 

DATA 

dc9006d037c5dbb033a5da4901 

CU 

3290 

DATA 

PM 

2390 

DATA 

85dad0032034872027873025a4 

KE 

3300 

DATA 

SP 

2400 

DATA 

e288blcc85d288blcc290385d3 

TS 

3310 

DATA 

BY 

2410 

DATA 

a5d90a0a05d391cca5cc3865e2 

NG 

3320 

DATA 

ID 

2420 

DATA 

85cc90b4e6cdb0b0a00160a052 

KZ 

3330 

DATA 

OE 

2430 

DATA 

a5cca6cd4c9384a050d0f5a5e0 

WF 

3340 

DATA 

VB 

2440 

DATA 

c5de9008d00ca5dfc5ddb006e6 

CC 

3350 

DATA 

YB 

2450 

DATA 

dfd002e6e0a5e048a5d£48a5d9 

FR 

3360 

DATA 

ZU 

2460 

DATA 

4 8a5cd4 8a5cc4 8a5dc4 8a5db4 8 

KQ 

3370 

DATA 

XX 

2470 

DATA 

a5da4 8a90085da201e88a90085 

ZD 

3380 

DATA 

GV 

2480 

DATA 

d785cc85cd85d9a5ccl865dd85 

SB 

3390 

DATA 

JQ 

2490 

DATA 

cca5cd65de85cda5d9690085d9 

ZS 

3400 

DATA 

PX 

2500 

DATA 

c5da9012d014 a5cdc5e0900ad0 

LU 

3410 

DATA 

DP 

2510 

DATA 

0ca5ccc5df£002b004e6d7d0d3 

KZ 

3420 

DATA 

HP 

2520 

DATA 

a4d720d689a954a203206989a0 

OC 

3430 

DATA 

ZN 

2530 

DATA 

0020ef89a90591d0a209a006a9 

HT 

3440 

DATA 

IB 

2540 

DATA 

0085dca90a85dba5dcl865db85 

QY 

3450 

DATA 

IZ 

2550 

DATA 

dcc5d79006f004a942d002a980 

XS 

3460 

DATA 

BH 

2560 

DATA 

9 Id0c8cal0e7 6 885da6 885db6 8 

IA 

3470 

DATA 

ZF 

2570 

DATA 

85dc6885cc6885cd6885d96885 




QM 

2580 

DATA 

df6885e06006df26e026da6020 




IM 

2590 

DATA 

f1874cf18720£187a5da48a5e0 




AE 

2600 

DATA 

48a5df4820f887681865df85df 




ZP 

2610 

DATA 

6865e085e06865da85da6020fe 





874cfe87a9cc85dba98a85dca0 
00caf015a006bldbc8c99bd0f9 
981865db85db90eae6dcb0e6a2 
03bldb95cc9d698cc8cal0f520 
6589a200a5cf85caa4cebld081 
d4203d898810f6204d89c6cal0 
eda003b9cc0081d4203d898810 
f5206 589a5ce85caa200a000bd 
e38891d0e8c8bde38891d0c6ce 
d0f6e8bde38891d0204d89c6cf 
f008a203a5ca85ced0d9e8e6cf 
e00790f3a004bldb85ccc8bldb 
85cd84ce206589a00084cfe6ce 
a4 cebldba4cfc9 9bf00fc940f0 
0591d0c8d0e9204d894cc38860 
5152457c007c5a5243a200a000 
204489ald499cc00c8c004d0f3 
206589a4cf204d8988d0faa200 
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4489ald499cc0099698cc8c004 
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d460a5d018692885d09002e6dl 
60a5d038e92885d0b002c6dl60 
a5cca6cdl8655885d08a655985 
dl60a2ff8efc02ecfc02f0fbad 
fc028efc02a22d2085f9c91cf0 
0218603860a5da489848a20420 
248868a820c7892074894820ec 
8868c92df005c90cl8d0013868 
85da600a084ac960b006e91£b0 
0269600a286a6020d689a9b5a2 
00206989a0004cef89a90085cc 
85cda207f8980aa8a5cc65cc85 
cc2 6 cdcal0f 2d860a5cdf00520 
0e8ad00ba5cc29£0d005a5cc4c 
0e8aa5cc4 84 a4 a4 a4 a200e8a6 8 
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603c00a87 a00003c6 6 7e603c0c 
487a003alel878583c00787al8 
187c6666666600807al8183c66 
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6955400000736f72746f77616e 
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590e9b032 20002 2b0000210d61 
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79002533230d6e6f7779003225 
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0080 
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I Na rozległym północnym oceanie leżała pokryta wiecznym lodem wyspa 
zamieszkała przez waleczne plemię Wikingów. Z braku innych możliwości 
trudnili się piractwem w ich żyłach płynęła krew morskich rozbójniko 
a za jedyne zajęcie godne prawdziwego męzczyzny uważali walkę 
z toporem w ręku.Młody syn wodza plemienia. Vicky od najmłodszych 
lat z zapartym tchem słuchał śpiewanych przy ogniskach sag. 
opowiadających o odważnych do szaleństwa wojownikach docierających 
na *wvch zdobionych głowami smoków statkach do najdalszych krańców 


świata i przywożących ze swych wypraw przebogate łupy. 

' i eniem młodego Wikinga było dokonanie takich samych lub nawet 
•vi ks/yeh wyczynów* Dla sławy i bogactwa gotów był na wszystko. 










/ udowi powitał A leń swych dwudziestych urodzin, kiedy to Rada 
Starszych plemienia p wadomiła go, ze zostanie poddany próbie 
kfoid /adecydu r jeąo przysz ości. Miał popłynąć na 
łoi czą wyprą w'aerunku wybrzeży odległych od 

-penetrowanych już m Jeśli zakończy się ona powodzeniem - 
o b ewi*n, iż po r ierci ojca zostanie wybrany wodzem plemienia 
Vicky wszedł na pokład okrętu pełen jak najlepszych przeczuć, 
limomł iigbwie ubyłjuz victn olonym wojownikiem, 
zii ył • ąc udział w kilku potyc kach, w walce na topory nie miał 
obie równych, Znał też doskonałe tajniki nawigacji i sztukę czytania 
map, której nau zył -»ę od starych, doświadczonych żeglazy. 
Wydawało się, ze mc nie jest w stanic przeszkodzić mu w osiągnię¬ 
ciu upragnionego celu. Zapomniał jednak, ze bogowie Wikingów 
są wyjątkowo złośliwi i bardzo lubią komplikowaćlosy śmiertelników 
Zwłaszcza jeśli ci ostatni czują się zbyt pewni siebie... 






O CMC 

raz 

jeszcze... 

Mimo zamieszczonych w Tajemnicach ATARI rad oraz dość 
obszernej Instrukcji dołączanej do programu, otrzymujemy na 
dal dużo listów w sprawach dotyczących korzystania z Chaos 
Musie Composera Z wielu poruszanych przez użytkowników 
problemów wybrałem te, które wydają ml się najbardziej Istotne 
oraz te, które wymagają szerszego omówienia 

Pierwszą ważną sprawą Jest sprostowanie błędu, który został 
popełniony przez autora artykułu ' Chaos Musie Composer - to 
wcale nie Jest trudne" (TA 8/92) Napisał on: " wybierz najwy¬ 
ższą oktawę (CONTROL + GÓRA) 1 naclśnlj klawisz P.”. Nieste¬ 
ty, po naciśnięciu tego klawisza nic się nie dzieje, ponieważ naj 
wyższa oktawa kończy się na klawiszu "O" 1 oczywiście ten kia 
wlsz powinien być wciśnięty w celu uzyskania brzmienia wer¬ 
bla W tym samym artykule czytamy "Wczytaj np demo BLUE - 
MON " Autor korzystał ze stacji dysków, więc podanie nazwy 
pliku demonstracyjnego do załadowania wydało mu się sprawą 
oczywistą. Zapomniał Jednak o użytkownikach magnetofonu 
którzy mogą nie wiedzieć, o Jakim pliku mowa Pokrótce 
przedstawię Jego charakterystyczne cechy 

Okno song wygląda następująco 
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— 
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Tempo utworu to 06, a wszystkie Instrumenty - "user_def. 

Drugą dość Istotną sprawą Jest wy korzysta nie skomponowa 
nej muzyki we własnym programie Jeśli chodzi o BASIC, to 
sprawa wydaje się prosta, gdyż przykładowy program DE¬ 
MO BAS teoretycznie zrobi za nas wszystko Jednak tak nie 
Jest 1 tu także pojawiły się kłopoty Napisał do nas autor pro¬ 
gramu demonstracyjnego któremu przestawała grać muzyka 
po wykonaniu Instrukcji GRAPHICS 15 Powodem tego był 
standardowy adres ładowania muzyki, równy $8400 Zaraz za 
muzyką znajduje się moduł odtwarzający który Jest kasowany 
przez Instrukcję GRAPHICS 15 W efekcie program grający wy¬ 
wołuje procedurę, której Juz nie ma i po prostu się zawiesza 
Aby uniknąć takiej sytuacji, należy w programie CMC przed na¬ 
graniem pliku zmienić adres na $7000 Służy do tego kombina¬ 
cja klawiszy CONTROL i A. Automatycznie ustawi się tez adres 
ładowania modułu odtwarzającego. Trzeba Jednak pamiętać 
o tym, by moduł kończył się przed niebezpiecznym obszarem 
pamięci (początek tego obszaru zalezy od trybu graficznego). Po 
zgraniu powinno to wszystko działać, należy Jednak pamię¬ 
tać, aby program w BASIC-u nie był zbyt długi, gdyż 'nadepnie" 
na początek naszej muzyki Najskuteczniejszą metodą uchro¬ 
nienia się przed takim wypadkiem Jest ustawienie tzw. memtop 
poniżej adresu początku muzyki Wykonujemy to, pisząc w pro¬ 
gramie POKE 106,112 Ta Instrukcja ochroni naszą muzykę 
przed zniszczeniem przez program BASIC-owy Jednak ceną za 
ochronę naszego programu Jest zmniejszona Ilość wolnej pa 
mięci RAM. Uważam, ze po tych uwagach każdy średnloza 
awansowany użytkownik będzie umiał odgrywać muzykę w do 
wolnym trybie graficznym BASIC-a 

Jeśli chodzi o odgrywanie muzyki z poziomu assemblera, to 
przedstawię krótki program, który odgrywa muzykę podczas 


przerwania synchronizacji pionowej ebikd Polecam Jego samo¬ 
dzielną analizę z Instrukcją obsługi CMC (str 17-20) w ręce 

* CHS player by HF f s 

* {c) 1992 Tajemnice ataki 

Opt % 10101 

setvbl equ $e4Sc 
exAtVbl equ $e462 
wbłkd equ $0224 
kbeodes e.qu $02fc 
horder equ $02c8 

vbłkd equ $07 

* - adresy w module 

m_adr equ $xxxx adres modułu 
ś“adr equ $xxxx adres muzyczki 

m_in.it egu m_adr+$03 
m_taet egu m~adr*$06 

voltrl equ m_ad r+ $09 
voltr2 egu m~«dr+$0a 
voltr3 egu m”adr-t-$0b 

* - komendy dla modułu 

p_song egu $00 
p_atpos egu $10 
p_.iiistr egu $20 
p_tempo egu $30 
p_coda egu $40 
p~break egu $50 
p_coht egu $60 
p~init equ $70 

org $480 

*—-r zachowaj stary adres przerwania 
Ida wblkd 
sta hlp w+1 
Ida vvbTkd+ł 
sta hlpjw*2 

* - inicjalizuj 

łdx <e_adr 
Idy >s~adr 
Ida #p"“init 
jsr mjgnit 

* - graj muzykę 

Ida łp__song 
tax 

jsr m_init 

*—- inicjalizuj nowe przerwanie 
Idy <płay 
idx >play 
Ida *vbikd 
jsr setvbł 

czekaj na klawisz 
Ida tm 

loop emp kbeodes 
beg loop 
sta kbeodes 

*—, oddaj stary wekktor przerwania 
Idy hlp w+l 
l.dx hlp w+2 
Ida #vbTkd 
jsr setvbl 

* - zakończ gre 

Ida #p coda 
jsr m_xnit 
rts ~ 

procedura taktujaca 
play jsr m tact 
Ida voltrl 
cle 

adc voltr2 
sta border 
hlpw jmp » 

end of file 


Marek Pasek 
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W poprzednim numerze TA zamieszczony został listing 
Edytora Fortha. Edytor ten napisałem cztery lata temu 
Używam go do tej pory 1 sądzę, że czytelnikom zainter¬ 
esowanym programowaniem w języku FORTH będzie on 
dobrze służył. W tym odcinku zajmiemy się opisem pozo¬ 
stałych funkcji tego edytora. 

Gdy wywołamy edytor (np 10 L). na ekranie ukażą się 
dwie pionowe linie wyznaczające lewy i prawy margines 
pola edycji. Z lewej strony znajduje się numer aktualnie 
wywołanego ekranu oraz liczba określająca ilość linii 
wprowadzonych do bufora Jeden ekran FORTHa skła¬ 
da się z 1024 bajtów 1 najczęściej bywa przedstawiany 
w postaci 16 lin i po 64 znaki. Ja zastosowałem linie 
o długości 32 znaków, gdyż mieszczą się one w całości 
na ekranie wyświetlanym przez nasz komputer. W związ¬ 
ku z tym cały ekran posiada 32 linie. 

Każdą z lini wyświetlanych na ekranie można wprowa¬ 
dzić do bufora. Linię znajdującą się w buforze można na 
stępnl umieścić w dowolnym miejscu bieżąc ego ekranu 
lub przenieść do innego 

Aby wprowadzić linę do bufora należy najechać naz 
nią kursorem, a następnie nacisnąć SHIFT 1 DELETE 
Gdy powtórzymy tę czynność, wprowadzimy do bufora 
kolejną linię tekstu Możemy w taki sposób umieścić tam 
cały ekran a następnie przenieść go pod inny numer 

Wyprowadzenie linii z bufora następuje po naciśnięciu 
klawisza TAB 


Uwagą klawisz RETURN nie pełni w tym edytorze fun 
kcji zn acznika końca lini, gdyż wszystkie linie mają zawsze 
długość 32 znaków (także puste). Klawisz ten przenosi je 
dynie kursor do początku nowej linii, oraz czyści bufor 

Przejdźmy teraz do opisu edytora w wersji kasetowej 
gdyż różni się on znacznie od wersji przeznaczonej dla 
stacji dysków. Podstawowa różnica polega na tym ze 


w pamięci komputera jest przechowywane jednocześnie 
14 ekranów tworzących jeden blok Pisany program mo¬ 
że składać się z dowolnej ilości takich bloków, jednak 
podczas kompilacji muszą one być oddzielnie doczytywa- 
ne. Praca na jedym bloku jest bardzo wygodna gdyż 
umożliwia szybki dostęp do każdego ekranu zawartego 
w danym bloku Cały blok ekranów jest umieszczany 
w pamięci, nad którą znajduje się ROM, nie zabiera więc 
pamięci dostępnej dla pisanego programu. Dzięki takie 
mu usytuowaniu bloku, nie znika on z pamięci kompute¬ 
ra nawet po wykonaniu zimnego startu 

Wersja kasetowa edytora ma kilka dodatkowych fun 
kcji ułatwiających korzystanie z magnetofonu. Są to na 

stępujące słowa wywoływane' z FORTHa 

C:EDIT odczyt bloku ekranów zapisanych na taśmie 
do pamięci Wejście do Edytora następuje po wpisaniu 

nrek L 

gdzie nrek to numer wywoływanego ekranu zawierający 

się w przedziale od 0 do 15. 

C: FLU5H - zapis całego bloku ekranów na kaset 

nrek LOAD - podobnie, jak w wersji dyskowej jest to 
kompilacja ekranu o numerze nrek Podany ekran musi 

znajdować się w bloku wprowadzonym wcześniej za po¬ 
mocą c :EDIT. Aby kompilacja nie została zakończona na 
wywołanym ekranie, należy umieścić w końcowych li¬ 
niach ekranu znak: —> 

Wprowad iłem także słowo umożliwiające przenosze¬ 
nie ekranów do Edytora FORTHa z Edytora Wprowadza¬ 
nia Uzyskujemy w ten sposób możliwość zapisu na ta¬ 
śmę wersji źródłowej wprowadzanego programu. Dzięki 
temu każdy z czytelników będzie mógł dowolnie modyll 
kować programy wklepane z Tajemnic Atari. Aby doko¬ 
nać wyżej opisanych czynności należy, po zakończeniu 
wprowadzania programu przy pomocy EDW, napisać: 

EDW-EDIT 

a następnie wywołać Edytor FORTHa np. 1 L, aby zoba 
czyć wprowadzony tekst. Po wyjściu z edytora (przy po¬ 
mocy klalwszy ESC i SPACJA) możemy zapisać całość 
na kasecie słowem C: FLUSH 

Właściciel magnetofonów zainteresowani językiem 
FORTH nie mieli niestety możliwości poznania cieka¬ 
wych słów znajdujących się na dyskietce zawierającej 
implementację EKTENDED flg-FORTH. Aby im to urno- 
żliwić wprowadziłem do Edytora FORTHa słowo: 

D:EDIT 

Umożliwia ono przeniesienie do Edytora FORTHa w wer 
sji kasetowej dowolnych ekranów z dysku. Wywołując po¬ 
wyższe słowo należy podać przed nim dwie liczby określa 
jące numer pierwszego i ostatniego ekranu, które chcemy 
przenieść, np 10 21 D:EDIT Warunkiem koniecznym do 
przeprowadzenia takiej operacji jest oczywiście dobra zna 
jomość z właścicielem stacji dysków 

Udało mi się przedstawić Czytelnikom najważniejsze 
słowa języka FORTH, oraz podstawowe narzędzia (AS 
SEMBLER i EDYTOR), niezbędne do pisania własnych 
programów. Myślę więc, ze zaczną powstawać ciekawe 
programy w tym języku tworzone przez Czytelników Ja 
chciałbym na razie zakończyć ten cykl poświęcony języ¬ 
kowi FORTH Czekam jednak na propozycje Czytelników 
i jeśli takie się pojawią - zostaną zamieszczone w Taje 
mnicach Atari Wszystkim czytelnikom pragnącym po- 










głębić swoją znajomość z Językiem, polecałbym książkę 
Jana Ruszczyca pt, "Poznajemy FORTH" Została ona 
wydana przez wydawnictwo SOETO, mieszczące się na 
ulicy Hożej 50 w Warszawie. 

Przez wszystkie odcinki tego cyklu przedstawiałem 
mój subiektywny punkt widzenia na temat języka 
FORTH Na zakończenie pragnę więc trochę przewrotnie 
przedstawić opinię poważnych znawców z dziedziny in¬ 
formatyki. Oto ona: 

"Język FORTH jest tylko i wyłącznie ciekawostką in¬ 
formatyczną, która nie ma i nie znajdzie żadnego pra¬ 
ktycznego (poważnego) zastosowania," 

Na koniec - część edytora przeznaczona dla posiada 
czy magnetofonów, która nie zmieściła się w poprzednim 


odcinku cyklu: 

01AU ( ED-KASETA ) 

0200 

03TN 0 VARIABLE PDL 

04N8 XSAVE 12 + CONSTANT Z% 

05JN XSAVE 14 + CONSTANT D% HEX 

06PU CODĘ PST BEGIN, D40B LDA, 

074G 0< NOT UNTIL, BEGIN, D40B LDA, 
08A9 0< UNTIL, FF # LDA, D40A STA, 
099K SEI, D301 DEC, RTS, C; 

0APH CODĘ >BL MAC PST 
0B70 BEGIN, DEY, Z% )Y LDA, 

0C5J D% )Y STA, 0 # CPY, 0= 

0D1V UNTIL, D301 INC, CLI, RTS, C; 
0ES7 CODĘ PMV XSAVE STX, 

0F67 PDL 1+ LDX, 0 # LDY, 

0GTC 0 # CPX, 0= NOT IF, 

0HBK BEGIN, MAC >BL Z% 1+ INC, D% 
0IO1 1+ INC, DEX, 0= UNTIL, THEN, 
0J6A PDL LDA, 0= NOT 
0KAH IF, PDL LDY, MAC >BL THEN, 

0L8S XSAVE LDX, NEXT JMP, C; DECIMAŁ 
0MMR : PMOVE PDL ! D% ! Z% ! PMV ; 
0NAM HEX 2800 CONSTANT G28 
0OSU : 2DL OVER + DUP >R G28 < 0= 
0P6R IF DUP G28 < 0= 

0QSI IF >R 0 0 C000 R G28 - + 

0RRG R> R SWAP - 

0SD3 ELSE >R D800 R + G28 R> — 

0TIN C000 R G28 - ENDIF ELSE 
0UDT >R D800 R + R> R SWAP - 0 0 
0V4P ENDIF R> DROP >R OVER R> SWAP ; 
10MH —> 

1100 

1200 

13V5 : >ROM ROT >R 2DL R + ROT ROT 
14H3 PMOVE R> ROT ROT PMOVE ; 

157D : <ROM ROT >R 2DL R + SWAP 
166E PMOVE R> SWAP PMOVE ; DECIMAŁ 
1700 

18ML HEX 340 VARIABLE IOCB 

19RM 0 VARIABLE IO.X 

1ALR 0 YARIABLE IO.CH 

1B39 : IOCC 10 * 70 MIN DUP IO.X C! 

1C3E 340 + IOCB ! ; 

1D2G : <IO> <BUILDS , DOES> @ IOCB 

1EU4 @ + ; 2 <IO> COM 

1FOB 4 <IO> BAL 8 <IO> BLL 

1GG4 A <IO> AX1 B <IO> AX2 

1HRB CODĘ XCIO XSAVE STX, IO.X LDX, 

1I3G IO.CH LDA, E456 JSR, 

1JID XSAVE LDX, IO.CH STA, TYA, 

1K4J PUSH0A JMP, C; 

1LEL : OPEN IOCC AX2 C! AX1 C! 

1M24 BAL ! 03 COM C! XCIO ; 

1NJB : <C> IOCC 0C COM C! XCIO ; 
lOTB : GB IOCC 7 COM C! BLL ! 

1PEO BAL ! XCIO ; 


1Q1V : PB IOCC B COM C! BLL ! 

1R3H BAL ! XCIO ; DECIMAL 
1SF8 67 VARIABLE C: 

1T5S : <0> C: SWAP 128 3 
1U3T OPEN DROP ; 

1VR3 : OPL 4 <0> ; : OPS 8 <0> ; 
20M7 : CLO 3 <C> DROP ; —> 

2100 

2200 

23EA : GETR B/BUF 3 GB ; 

24LL : PUTR B/BUF 3 PB ; 

2536 0 YARIABLE AROM 

263C 0 VARIABLE ROM 

27LG 0 VARIABLE S-L 

283J : NARC >R AROM ! PAD R> 

299N PAD AROM § B/BUF ROM @ 

2ALA IF <ROM ELSE >R SWAP R> 

2BID CMOVE ENDIF ; 

2CKR : +NC S-L I 

2DIT IF PAD AROM I B/BUF 

2EAB ROM @ IF >ROM ELSE CMOVE ENDIF 

2F1J B/BUF AROM +! ELSE B/BUF 

2GRH AROM +! PAD AROM § B/BUF 

2H09 ROM § IF <ROM ELSE 

21IM >R SWAP R> CMOVE ENDIF ENDIF ; 

2JFS 0 VARIABLE #ER 

2K91 : BCAS NARC 0 

2LGK DO DUP S-L § IF GETR ELSE 

2MFS PUTR ENDIF #ER ! 

2N6E #ER Cl 1 = IF +NC 

20E5 ELSE #ER § % 136 = #ER § 4 = 

2PVC + 0= IF I 0= 

2QV3 IF 3 ELSE 2 ENDIF #ER ! 

2R50 ELSE #ER @ % 136 = 

2SA3 IF 1 #ER ! ENDIF ENDIF LEAVE 
2TNO ENDIF LOOP DROP -1 #ER +! ; 
2U55 : LCAS 1 S-L ! OPL BCAS CLO ; 
2V9G : SCAS 0 S-L ! OPS BCAS CLO ; 
30A1 —> 

3100 

3200 

33E7 : INDEX EMPTY-BUFFERS 
34MQ INDEX ; 

351Q 1024 CONSTANT &24 

36DD : B>R DUP >R BŁOCK R> B/BUF * 

370C &24 - B/BUF >ROM ; 

38L4 : BR DUP >R BUFFER R> B/BUF * 
39QK &24 - B/BUF ; : B<R BR <ROM ; 
3A60 : ER B/SCR * DUP 
3B72 B/SCR + SWAP ; 

3C1J : E>R ER DO I B>R LOOP ; 

3D0B : E<R ER DO I B<R LOOP ; 

3EEE ( NREKR - ) 

3FUD 0 VARIABLE FR 

3G9B : FROM % 14 0 

3HCO DO FR &24 1*2 >ROM 
3I8P LOOP ; 

3J33 (-) 

3K00 

3L39 0 VARIABLE SR 

3MU5 : ILR SR SWAP 1 - &24 

3N02 * 2 <ROM SR § ; 

30H5 ( NREK - F=0 ) 

3P00 

3Q79 : ILROM 0 0 14 
3RB0 DO I ILR 

3SD5 IF LEAVE ELSE 1+ ENDIF 
3TGG -1 +LOOP % 14 SWAP - ; 

3U0P ( - ILEKR ) 

3V00 

40A1 —> 

4100 

4200 

4305 : YF % 252 1 ILR 256 
44JA <=< IF FROM ENDIF ; 

45JM : 0WA 0 WARNING ! ; 


4600 

478D : E. EMPTY-BUFFERS 0WA YF 
485A SCR § 1 MAX % 14 MIN DUP SCR ! 
4944 >R R E<R R ILR 0= IF 
4AQG CLEAR ENDIF (E) 

4B8V EXFO R> E>R ; 

4C33 (-) 

4D00 

4EGK : ?DNR 0 OVER % 15 <=< IF 
4FGL 1 ELSE DROP 
4G6J CR Zly numer" 

4HRS CR BEEP 0 ENDIF ; 

4IGU : L. ?DNR IF SCR ! E. ENDIF ; 

4JEE ( NREKR - ) 

4K52 : CSOU 8 0 DO 0 53760 I + C! 
4LMB 2 +LOOP ; 

4M33 (-) 

4NMF : C:FLUSH 1 ROM ! 

406K 0 ILROM B/SCR * SCAS CSOU ; 
4P33 (-) 

4QMU : C:EDIT 0WA FROM 1 ROM ! 

4R8P 0 [ 14 8 * ] LITERAL LCAS 
4S72 #ER e IF CR ." Blad odczytu" 
4T6V BEEP CR ENDIF ; 

4U33 (-) 

4V00 
50A1 —> 

5133 (-) 

5200 

53E0 : IND EMPTY BUFFERS YF 
54SN % 15 1 DO I B/SCR * DUP 
55GB B<R BŁOCK DUP C@ 

566Q IF % 32 -TRAILING CR I . 

57UH TYPE ELSE DROP ENDIF 
588P LOOP ; 

5933 (-) 

5ACA : LOAD ?DNR IF 0WA BEGIN 1 CG 
5BJA ! EMPTY-BUFFERS DUP ILR IF DUP 
5CEG E<R DUP >R LOAD R> 1+ ENDIF 
5DBI CG § UNTIL DROP ENDIF ; 

5EL0 ( NREK ) 

5FDO : E<EW ER DO I BR >R 

5G9A 37000 + SWAP R> CMOVE LOOP ; 

5HL0 ( NREK ) 

SILE : EDW-EDIT FROM EW AB @ 

5JNJ &24 / 1+ 1 DO EMPTY-BUFFERS 
5KJH I E<EW I E>R LOOP } 

5LBO ( - Z EDW do EDYTORA ) 

5MOR : D:EDIT 0WA FROM OVER - 1+ 
5NB0 % 14 MIN OVER + EMPTY-BUFFERS 
508D B/SCR * SWAP B/SCR * 

5P9R 0 ROT ROT DO I BŁOCK OVER 
5QHN B/BUF >ROM B/BUF + LOOP DROP ; 

5RBD ( EKRl EK2 - ) 

5SQJ : CLEAR SCR @ ?DNR IF SCR @ 
5TKO EMPTY-BUFFERS 
5UMT E<R CLEAR SCR § E>R ENDIF ; 
5VD2 ( END ) 


Roland Pantoła 


rMdlMK 

Czy pamiętacie dzlesbinowe szaleństwo? Nie, nie bójcie się! 
Program, zamieszczony poniżej nie przelicza liczb z żadnego sy¬ 
stemu na inny. Skojarzenie wynika z faktu, że Pasiak pokazuje. 

Jak krócej i sprawniej uzyskać ładny efekt graficzny prezento¬ 
wany w TA 6-7/92 przez Pawła Kalinowskiego Autorem Pasia¬ 
ka Jest Adam Godlewski z Wołomina 

TV 1 FOR 1=0 TO 3:POKE 53256+1,3:POKE 532 

48+1,48+1*32:PQKE 53252+1,176+1*8:POKE RV 

704+1,4+I*2:POKE 53261+1,170:NEXT I 
JX 2 POKE 623,17:POK£ 53260,255:PQKE 711, OO 

12:POKE 53265,170:POKE 709,15:PQK£ 710 **D 

,0 



Ładnych, trójwymiarowych napisów nigdy dość! Chyba tym ha¬ 
słem kierują się Czytelnicy, którzy nie ustają w wysiłkach 1 dostar¬ 
czają nam coraz bardziej wymyślne programy, tworzące złudzenie 
przestrzenności, Tym razem trójwymiarowa (ang. three-dlmensio- 
nal, a w skrócie 3D) propozycja Marcina Łozy z Rzeszowa. 


IP 1 DIM A$(20):C=0:G1=3:C2=2 :AD=PEEK( 756 
)*256;P=15:7 “Podaj tekst (maksimum 20 
znaków)”: INPUT A$ :C=C1: Z=20-LEN{ A$ ) 

PL 2 GRAPHICS 23:Z=Z*4:P=P+8:FOR 0=1 TO 2 
:FOR S=1 TO LEN(A$):W=LEN(A$)*4:L=AD+( 
ASC(A$(S,S))—32)*8:FOR T=L TO L+7 
CR 3 G=PEEK(T):FOR H=7 TO 0 STEP -l:COLOR 
0:PLOT W+Z,P:IF G/2>INT(G/2) THEN COL 
OR C: U=ADR ("*•): DRAWTO H+N+Z, T-L 
ZD 4 G=INT(G/2) :NEXT H:NEXT T:N=N+8:NEXT 
S:C=C2:POKE U+3,44:N=0:NEXT 0:P0KE U+3 
,47:C0L0R ClrPLOT W+Z,P:POKE 764,255 
PC 5 IF PEEK(764)=255 THEN 5 



Szybciej, silniej, wyżej W tym numerze wybieramy silniej, 
a właściwie silnię. Ostatni z pięclollnijkowców oblicza silnię 
z zadanej liczby. Przypominam definicję: 

n! = l*2*3*...*n 

Bardzo ciekawe Jest to, że prezentowany poniżej program radzi 
sdbie z całkiem dużymi liczbami, podczas testów stwierdziłem, ze 
bije na głowę większość kalkulatorów 

Uwaga Długość tablicy L, zadeklarowanej w wierszu nr 1 okre¬ 
śla dopuszczalną liczbę cyfr wyniku 
Autorem programu Jest Jacek Cybularczyk z Kołobrzegu. 

HU 1 DIM L(1000<:? "Program oblicza n! Po 
daj n=*;:INPUT #16;F:G=0:Z=1:POKE 559, 

0:FOR H=2 TO 1000sL(H)=0:NEXT H:L(1)=1 

2 G=G+1:FOR H=1 TO Z:L(H)=G*L(H):NEXT 
H:FOR H=1 TO Z+4:IF L(H)<10 THEN 4 

3 J=INT(L(H)/10):L(H+l)=L(H+l)+J:L(H)= 
L(H)-10*J:IF H>=Z THEN Z=H+1 

4 NEXT H:IF GOF AND F<>0 THEN 2 

5 POKE 559,34:? CHR$(253);F;*l=";:FOR 
H=Z TO 1 STEP -1:? L(H);:NEXT Hf? 























W czasie badan archeologicznych na lerenle Sahary Za 
chodnic) odnaleziono dyskietkę Wiek nośnika oceniono na 
kilka lyslęcy lat, ale minio to postanowiono sprawdzić Jego 
zawartość Dyskietkę przewieziono do Kalifornii, gdzie od¬ 
czytano jej zawartość Program nie był jednak zrozumiały 
dla ludzi Do Jego odszyfrowania zasiedli najwięksi uczeni 
świata. Po kilku tygodniach złamano kod 1 odczytano za¬ 
szyfrowane informacje. Okazało się, ze dyskietkę zostawili 
przybysze z kosmosu .którzy dawniej odwiedzali Ziemię. 
Sam program przypominał coś w rodzaju testu na inteli¬ 
gencję. Ja również uczestniczyłem w tych badaniach i spo¬ 
dobała ml się ta łamigłówka Postanowiłem przenieść ten 
program na "małe" ATARI. JeSli chcesz sprawdzić swoją 
inteligencję, jeśli Interesują Clę gry zmuszające do myślenia 
przepisz listing Logika, a na pewno nie pożałujesz. 

Twoim zadaniem Jest odgadnięcie cyfr zakodowanych 
na pięciu miejscach. Po każdej próbie komputer pokazu¬ 
je ilość trafionych cyfr Jeśli zapaliła się cała kontrolka 
to znaczy, ze Jedna cyfra Jest na swoim miejscu. Gdy za¬ 
pala się pół kontrolki to znaczy, że taka cyfra jest w za¬ 
szyfrowanym kodzie, ale znajduje się na złym miejscu. 

UWAGA. Pozycja zaświeconej kontrolki nie odzwier¬ 
ciedla pozycji odgadniętej cyfry. Za każdą całą zaświeco¬ 
ną kontrolkę otrzymujesz 50 punktów, natomiast za pół 
literki 30 punktów. Gra Jest podzielona na trzynaście 
etapów. W pierwszym etapie masz osiemnaście prób. 
Wraz z każdym kolejnym etapem ilość prób się zmniej¬ 
sza oJeden 

Grą można sterować za pomocą Joysticka lub klawiatury. 

góra, dół - ustawianie cyfry lewo, 
prawo - wybór cyfry 

FIRE, RETURN - zatwierdzenie kombinacji 
SPACJA - przerwa 
CLEAR - przerwanie gry 
ESC - wyjście z gry. 

Zamieszczony obok listing należy przepisać i połączyć 
ze "Zgrywusem+", drukowanym w TA 2/92. 


IJ 1000 rem *-* 

DA 1002 REM : LOGIK : 
XU 1004 REM : autor: Krzysztof Bar : 
YY 1006 REM : (c) 1992 Tajemnice ATARI : 
JP 1008 REM *-* 


YM 1010 DATA ffff0090bd986820c694a200a0 
CY 1020 DATA e086b084bla200a08c86b284b3 
FX 1030 DATA a203a000blb091b2c8d0f9e6bl 
PK 1040 DATA e6b3cal0f2a296a09886b084bl 
RT 1050 DATA a218a08c86b284b3a027blb091 
HR 1060 DATA b28810f9aef402a08c8ebe988c 
YD 1070 DATA f402a004b9c40299bf98b90297 
QN 1080 DATA 99c4028810flae2f02a0228ec6 
LR 1090 DATA 988c2f02ae3002ac31028ec498 
XJ 1100 DATA 8cc5 9 8a2e0a09 6 8e30028c3102 
PR 1110 DATA 202f95a219a027a90091b08810 
0V 1120 DATA fb20dl94cal0f1202f95a005a9 
PH 1130 DATA 5191b0a952c8f0fd91b0c024d0 
PK 1140 DATA f7a94591b020dl94a005a97c91 
KS 1150 DATA b0a024a9419lb0c8a9459lb020 
HS 1160 DATA dl94a212a97ca00591b0a02491 
MK 1170 DATA b0c891b020dl94cal0eda005a9 
JV 1180 DATA 5a91b0c8a95791b0a952c891b0 
LD 1190 DATA C024d0f9a94391b0c8a97c91b0 
AY 1200 DATA 20dl94a006a95a91b0a952c891 
CD 1210 DATA b0c02 5d0f 9 a9 4 3 9Ib0a241a08 8 
MQ 1220 DATA 86b084bla296a09786b284b3a2 
NB 1230 DATA 13a002blb291b08810f920dl94 
XM 1240 DATA a5b218690385b2a5b3690085b3 
UX 1250 DATA Cal0e4a292a08b86b084bla2d2 
DZ 1260 DATA a09786b284b3a202a015blb291 
CP 1270 DATA b08810f920dl94a5b218691685 
JG 1280 DATA b2a5b3690085b3cal0e4a256a0 
ZW 1290 DATA 8886b084bla214a09886b284b3 
XZ 1300 DATA a209a00cbIb291b08810f920df 
HS 1310 DATA 9420dl94cal0ee206395a201a0 
JS 1320 DATA 00203895acfc02a200209a96a9 
TZ 1330 DATA ff8dfc02a514c514f0fca201bd 
TF 1340 DATA 8402f011cal0f8adfc02c91cd0 
XY 1350 DATA 034ca996c90cd0e2a007a514c5 
IT 1360 DATA 14f0fc88l0f7a0048cdd98a910 
RB 1370 DATA 99d6888810faa0108c6088c88c 
YJ 1380 DATA 6188a9118dc898a9008dc798a2 
YD 1390 DATA e6a08986b084bla900a00c91b0 
JP 1400 DATA 8810fba95cacc79891b0206395 
VK 1410 DATA a24 7a08886b084b1a212a00da9 
FF 1420 DATA 0091b08810fb20dl94cal0fla0 
FO 1430 DATA 07b9d89699cb988810f7aecb98 
PG 1440 DATA accc9886b084bla004a91091b0 
DT 1450 DATA 8810f9a004ad0ad20910c91a90 
YS *1460 DATA 0638e90a4c409299d3988810eb 
AO 1470 DATA a9008dc998a9328dca98a005b9 
KY 1480 DATA cd9899b0008810f7aecd98acce 
HL 1490 DATA 9886b084bladc898c90a900aa0 
VG 1500 DATA 1138e90a4910aal005a0104910 
DP 1510 DATA aa98a00091b08ac891b0acc998 
XS 1520 DATA a95c91b4a905a88891b28810fb 
DQ 1530 DATA a9ff8dfc02a514c514f0fcadfc 
KL 1540 DATA 02c91cd0034ca996c936d0034c 
YP 1550 DATA 9c95c921d05b20c69420ed94a2 
UL 1560 DATA 09a00cblb091b28810f920dl94 
CD 1570 DATA 20df94cal0ee206395a200a002 
IF 1580 DATA 203895a9ff8dfc02adfc02c91c 
KV 1590 DATA d0034ca996c936d0034c9c95c9 
KJ 1600 DATA 21d0eb20639520ed94a209a00c 
GG 1610 DATA blb291b08810f920df9420dl94 
CK 1620 DATA cal0ee4c9e92a5142907f0034c 
AK 1630 DATA b693adfc02c907f016c906f01e 
VC 1640 DATA a201bd7802c907f009c90bf011 
BP 1650 DATA cal0f23031acc998c8c005d00c 
RU 1660 DATA a0001008acc998881002a0048c 
VO 1670 DATA c998a900a00491b48810fba95c 
MC 1680 DATA acc99891b4a9048ddd98a9ff8d 
LK 1690 DATA fc0220fe94acc998adfc02c90e 
MP 1700 DATA f016c90ff01ea201bd7802c90e 
NZ 1710 DATA f009c90df0llcal0f23023blb0 









LH 1720 DATA aae8e01ad00ea210100ablb0aa 
BS 1730 DATA cae00fd002a2198a91b0a9048d 
WR 1740 DATA dd98a9ff8dfc02addd98100320 
RE 1750 DATA 8496a5142907d011adfc02c90c 
0V 1760 DATA f00dad8402f008ad8502f0034c 
FF 1770 DATA a392a9048ddd98a207addd98f0 
PR 1780 DATA 03208496a514c514f0fccal0ef 
CW 1790 DATA 20fe94aecf98acd09886b284b3 
DU 1800 DATA a004a90099d8988810faa200a0 
VH 1810 DATA 00blb0d9d398d010a90799d898 
UT 1820 DATA 98488aa8a90791b268a8e8c8c0 
OS 1830 DATA 05d0e4a000blb085b584b4b9d8 
UW 1840 DATA 98d021a000b9d898d015a5b5d9 
MQ 1850 DATA d398d00ea90699d8988aa8a906 
AH 1860 DATA 9Ib2e81005c8c005d0ela4b4c8 
CJ 1870 DATA C005d0cda200a004blb2c907d0 
HK 1880 DATA 05e8e8e8e8e8c906d003e8e8e8 
EB 1890 DATA 8810eb8ede98e019d0034cc295 
CN 1900 DATA 203b96cec898adc89810034caf 
NA 1910 DATA 95aecb98accc9886b084bla000 
Q0 1920 DATA b9cb9818692899cb98c8b9cb98 
BF 1930 DATA 690099cb98c8c008d0e9aecb98 
UC 1940 DATA accc9886b284b3a004blb091b2 
SY 1950 DATA 8810194c5592a008a9009900d2 
IF 1960 DATA 8810la60a5b018692885b0a5bl 
RP 1970 DATA 690085bl60a5b218690d85b2a5 
MS 1980 DATA b3690085b360a232a08886b084 
RO 1990 DATA bla2dla09886b284b360aecb98 
GP 2000 DATA accc9886b084bl60a201a514c5 
KG 2010 DATA 14l0lccal01760203895a9138d 
WU 2020 DATA 02d2a9c98d03d2200995206395 
MM 2030 DATA 20c69420099560a210a08786b0 
XH 2040 DATA 84bl60a98685b0a98a85bla907 
ED 2050 DATA 85b2a99785b388300520dl94d0 
HM 2060 DATA 18a00cblb291b088101920dl94 
BB 2070 DATA 20dl94cal0ee60a286a08a86b0 
DV 2080 DATA 84bla201a00ca90091b088101b 
KI 2090 DATA 20dl94cal01160a032adlc02c9 
ZI 2100 DATA Icd0034ca996c936100ca514c5 
KA 2110 DATA 14101c8810e9cal0e44c879120 
CO 2120 DATA 6395a200a003203895a9118dfc 
OR 2130 DATA 02a20110ce206395a201a00420 
SS 2140 DATA 3895a9118dlc02a204d0bbadc8 
UB 2150 DATA 981010a89848a9198dde98203b 
NG 2160 DATA 9668a888101Ieec798adc798c9 
VK 2170 DATA 0dl031ee6188ad618 8c91ad008 
IS 2180 DATA a9108d6188ee6088a91138edc7 
JO 2190 DATA 988dc898a0029848206395a200 
DM 2200 DATA a00a20159568a88810e!4ce791 
FL 2210 DATA a0059848206395a201a0082015 
BO 2220 DATA 9568a88810ela201a008203895 
JH 2230 DATA a9008dd796a9118dlc02a20d4c 
MG 2240 DATA 7d95adde98l043cede98adde98 
GA 2250 DATA 103b205096cede98d0l3a204a9 
VJ 2260 DATA 109dd688caled688bdd688c91a 
TQ 2270 DATA 1010a203a000b91e88d9d68890 
VG 2280 DATA 0al002b011c8cal010300ba003 
PZ 2290 DATA b9d688991e8888101760aedd98 
YA 2300 DATA e004d005a9498d03d2ca8edd98 
UB 2310 DATA d00320c69460a032a514c51410 
GA 2320 DATA lc8810l7cal0126020c694adbe 
GA 2330 DATA 988dl402a004b9bl9899c40288 
AT 2340 DATA 10l7aec498acc5988e30028c31 
QB 2350 DATA 02adc6988d2I02a9118dlc026c 
HU 2360 DATA 0a00004a884788508872887070 
MO 2370 DATA 30421087020202020202020202 
XS 2380 DATA 02020202020202020202020202 
NB 2390 DATA 02020241e09628cd0046003225 
US 2400 DATA 3435322e006c75620000000026 
V0 2410 DATA 29322500746100677261000000 
ZG 2420 DATA 0030727a657277610000002772 
LM 2430 DATA 610070727a657277616e61002e 
PX 2440 DATA 6965007a676164036504000000 
CV 2450 DATA 00002b212e2925230000000000 
ZO 2460 DATA 00000000000000000000000000 
RA 2470 DATA 00000000000000000000002272 


RI 2480 DATA 61776101002a65737465040033 
HO 2490 DATA 35302532002c2127292b000000 
VH 2500 DATA 003a6761640365040000008000 
KC 2510 DATA 00800000800055d5d5d5ccd5cb 
NK 2520 DATA 8000808000804bd54cccd5cb80 
FJ 2530 DATA 0000804b804bd5d54b804c0080 
LV 2540 DATA 000080004bd54c80008080cc4c 
CV 2550 DATA 804bcbd500d500246c61000234 
YM 2560 DATA 616a656d6e6963002134213229 
HR 2570 DATA 02006e6170697361031a002b72 
EY 2580 DATA 7a79737a74616600226172646e 
EM 2590 DATA 69611a001113002b776965746e 
MK 2600 DATA 696100111919120030617a6961 
CY 2610 DATA 6dla0000101100000000000000 
WE 2620 DATA 00000000000000525252525252 
MA 2630 DATA 5252525252525230756e6b7479 
XU 2640 DATA Ia00101010101032656b617264 
XF 2650 DATA la001010101010525252525252 
GH 2660 DATA 52525252525252000000000000 
AH 2670 DATA 00000000000046000000000000 
ML 2680 DATA 00004e55cd8080000000004e55 
HQ 2690 DATA cd8080808080804e55cd808080 
SL 2700 DATA 808080808080800038181c3818 
PW 2710 DATA 3c000cl83e603c067c00007cc6 
VS 2720 DATA c6c6c67c00007cc6c61ele7c00 
TX 2730 DATA 007clelelele7c00e002el0201 
JV 2740 DATA 90 


Krzysztof Bar 



Pan Tomasz Łabuz z Tarnowa pyta o złącze MI¬ 
DI dla małego ATARI: 


Piszę do Was pierwszy raz, choć czytam od 
zawsze. Tak trzymać, albo jeszcze lepiej!! Pi¬ 
szę, gdyż przeczytałem w numerze 8/92, we 
wstępie od Redaktora o złączu MIDI. Pisze tam, 
ze złącze to jest dostępne na małe ATARI Jeśli 
cos wiecie więcej na ten temat napiszcie gdzie 
i za ile, itd, itp. 

Szanowny Panie! 

Złącze MIDI, o którym wspominał Redaktor, Ist¬ 
nieje niejako połowicznie. Jeden z naszych auto¬ 
rów dostarczył nam to złącze, ale trzeba Jeszcze 
trochę poczekać na rozwiązania programowe pro¬ 
blemów z transmisją pomiędzy małym ATARI, 
a urządzeniami, które pracują w standardzie MI 
DI Zdaję sobie sprawę z tego, ze temat MIDI jest 
bardzo atrakcyjny. Miło byłoby mleć na przykład 
program Chaos Musie Composer, który mógłby 
się komunikować z popularnymi "klawiszami’',.. 

f 

Bądźmy dobrej myśli. Mam nadzieję, ze Już nie- ’ 
długo powstanie odpowiednie oprogramowanie. 1 
Na pewno opiszemy je na łamach naszego czaso¬ 
pisma Na razie mogę tylko polecić wielbicielom 
muzyki kolejny artykuł, odsłaniający tajemnice 
CMC, który znajdą w tym numerze TA. Lepszy 
wróbel w garści . 

u..,. 'JL • i 1 . JA 1 !- 1 .''JiUOTWffPWiS.LlfiJ' 1 4LWJ •*." 















Wykaz punktów sprzedających bieżące i archiwalne numery Tajemnic Atari. 
Drukiem pogrubionym zaznaczono miejsca, w których można równocześnie kupić 

legalne oprogramowanie L.K. AYALON 


DRZAJA 

Mirowska 6, Częstochowa 

MICROMAN 

Plebiscytowa 31, Katowice 

Rynek 4 Rybnik 

DH HERMES, Rybnik 

SUPERMARKET, Sosnowiec 

Wojska Polskiego 14, 

Bielsko-Biała 

KRYMARYS 

Toruńska 63, Koki 

KSIĘGARNIA TECHNICZNA 

Podwale 4. Kraków 

BIT PLUS 

Bieżanowska 1, Kraków 
VIDEO CENTRUM 
Kościelna 5 Krynica Górska 
RETURN Studio Komputerowe 
Zamojska 25, Lublin 
POMAREX 
Bernardyńska 20, 

Niecała 12, Lublin 


KSIĘGARNIA TECHNICZNA 
Komuny Paryskiej 5a, Łódź 
#TRACK# 

Reymonta 23 
Kołłątaja 11 Opole 
ZAKŁAD Usług Komputerowych 
Ogrody 1 la, Ostrowiec Św. 
METRO COMPUTER 
Wierzbięcice 37 Poznań 
P.H, METRO 
Ratajczaka 31, Poznań 

STUDIO-SIX 
Rejtana 3, Przemysi 
BAJT Rejtana 33, Rzeszów 
DĄBI, Szopena Rzeszów 
BARTEK, Kościuszki Rzeszów 
DOMAR 

Zygmuntowska Rzeszów 
STEL DOM 
Pomorska 7 Słupsk 
JOKER 

Mickiewicza 15, Si, Woia 


KWANT Agencja Handlowa 
Żydowska 6, Tarnów 
SON!X Sp z o. o. 

Rapackiego 3 
DT Centrum 

Rydla (Helios 2), Szczecin 
COMPUTER CENTER WARS 
Marszałkowska 104/122 
Warszawa 
ATARI STUDIO 
Gen Abrahama 4, Warszawa 
O K W ELEKTRONIKA 
Mokotowska 51/53 Warszawa 
OSKAR 

Grochowska 207 (Universam) 
Jana Pawła II58 (Maxim) 
Iganska 26 Warstwa 

DOMAIN SOFT 
Kołłątaja 31 Wrocław 
COMAT 

Kniaziewicza 19 Wrocław 

KSIĘGARNIA STAROMIEJSKA 
Żeromskiego 16, Zielona Góra 


Zachęcamy właścicieli sklepów 
zainteresowanych sprzedażą 
pisma iub oprogramowania do 
kontaktu z wydawcą Tajemnic 
Atari, lub z L.K. AVALON. 
Najszybszy kontakt teiefoniczny 
pod numer (17) 374-71 wew. 
274,275 od 7:30 do 15:00. Ofe¬ 
rujemy korzystne warunki 
współpracy. Firmy bądź sklepy 
zainteresowane kolportażem 
gazet otrzymują je na zasadach 
komisowych, a ponadto ich ad¬ 
resy są drukowane w TA, co 
stanowi dobrą rekiamę. 


L.K. AYALON 


skr. poczt. 46 , Strzyzow 

proponuje: 


Filtry monitorowe siatkowe 

mono/kolor 14 cali 

190.000 

mono/kolor 14 cali, z uziemieniem 

230.000 

Akcesoria 


rozgałęziacz komputer / antena 

35.000 

pokrywy na ATARI XL lub XE 

50.000 

taśma do drukarek STAR LC 10/20 

MICROPRINT (prod USA) 

60 000 

umożliwiający podłączenie do ATARI 
dowolnej drukarki (CENTRONICS) 

200.000 

dyskietka czyszcząca 5 25' 
pudelka na dyskietki o pojemności: 

50 000 

5 szt 

25.000 

10 szt 

30.000 

50 szt. 

100.000 

100 szt. 

130.000 

Literatura 


Leksykon komp dla początkujących 

25 000 

Słownik term i komunikatów komp 

25 000 

Instrukcja ATARI 65 XE / 130 XE 

30 000 

Atari Basic dla dzieci 

30.000 

Logo Atari 

30.000 

Poznajemy komputer Atari XL/XE 

30 000 

Mac 65 

30.000 

Opisy gier na małe Atari 

35 000 

Atari Basic 

55 000 

Atari Logo 

55 000 

Do łącznego zamówienia naieży 

doliczyć 

koszt wysyłki (20.000 zł). W przypadku za- 

mówienia również oprogramowania 

z oferty 

na ostatniej stronie pisma, koszt wysyłki nie 
jest doliczany. Wszystkie ceny ważne są do 
ukazania się następnego numeru TA. 



SE 
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RAM-CART 










» Uniwersalny moduł cartndge 
do komputerów ATARI XL/XE 

» Można na nim zapisywać do¬ 
wolne programy 

» Natychmiastowy dostęp do 
danych 

» nieulotna pamięć dzięki pod¬ 
trzymaniu bateryjnemu 

» dla zaawansowanych symula¬ 
cja stacji dyskietek 


I Do każdego RAM CARTu dołączone są programy pomocnicze na 
kasecie i dyskietce oraz podręcznik użytkownika systemu opraco 
wany w L.K AVALON 

i Jako autoryzowany dystrybutor RAM CARTu udzielamy rocznej 
gwarancji działania modułu. W wypadku wystąpienia wad unie 
mozliwiających używanie systemu, drogą pocztową wymienimy 
wadliwe egzemplarze na poprawnie działające 
Cena systemu z 64KB pamięci 390.000 zł (w cenę wliczono ko¬ 
szty przesyłki). 

Zamówienia należy kierować na adres 

L.K. AVALON 
skr. poczt. 46 
38-100 Strzyżów 














